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
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询