VB中 在选择一个单选框并且按“确定”按钮才会在文本框中显示相应内容，
之选择单选框无效
在vb窗口中加入command1,option1,text1
然后将以下代码写入代码窗。
Private Sub Command1_Click()
If Option1.Value = True Then
Text1.Text = "这里有内容啦！"
Option1.Enabled = False
Else
MsgBox "单选框没有选中！"
End If
End Sub
Private Sub Form_Load()
Command1.Caption = "确定"
Option1.Caption = "单选框"
Text1.Text = ""
Option1.Value = False
End Sub
然后将以下代码写入代码窗。
Private Sub Command1_Click()
If Option1.Value = True Then
Text1.Text = "这里有内容啦！"
Option1.Enabled = False
Else
MsgBox "单选框没有选中！"
End If
End Sub
Private Sub Form_Load()
Command1.Caption = "确定"
Option1.Caption = "单选框"
Text1.Text = ""
Option1.Value = False
End Sub
温馨提示：答案为网友推荐，仅供参考
第1个回答 2008-10-26
建单选框option1、文本框text1、按钮command1
实现：选单选框后再按按钮才显示文本，否则不显示
private sub command1_click()
if option1=true then text1.text="你所需显示的内容"
end sub
实现：选单选框后再按按钮才显示文本，否则不显示
private sub command1_click()
if option1=true then text1.text="你所需显示的内容"
end sub
