vb 单选命令按钮

来源：百度知道编辑：UC知道时间：2024/09/23 02:26:09

刚学VB，遇到一个问题，希望高手能帮小弟一下！
就是在我编程的时候
Private Sub Command3_Click()
If Option1.Visible = True Then Picture1.Picture = LoadPicture("D:\Program Files\新建文件夹\开灯.gif"):
Picture2.Picture = LoadPicture("D:\Program Files\新建文件夹\开灯.gif")
End Sub
我在命令按钮下加了一个判断单选按钮是否被选的选项，目的是要在单选按钮被选择时，按下命令按钮，Then以后的语句才被执行，但程序运行时才发现，无论我所设定的单选按钮是否被选择，按下命令按钮程序都会执行Then以后的语句，不知什么原因，希望大家指出我哪里错了，应该怎么改？？

不是Option1.Visible属性吧, 这个属性是可见与不可见, 而不是被选中
正确应该是

if Option1.Checked then ……

第一种:
Private Sub Command1_Click()
a = IIf(Option1, "1", "2")
MsgBox a
End Sub

第二种:
Private Sub Command1_Click()
If Option1.Value = True Then
MsgBox "option1被选中"
Else
MsgBox "option2被选中"
End If
End Sub

注意Value和Visible属性的区别

vb 单选按钮本人新手,请教VB高手们有关命令按钮和单选按钮的问题初学vb问个问题，如何用单选按钮和命令按钮制作关闭windows 的程序？ VB中命令按钮默认属性是什么？ VB命令按钮如何启动QQ 初学vb 想请教高手关于单选按钮option应用的问题. 请问VB 中有没有命令按钮数组怎么添加？？ VB里如何改变命令按钮中文字的颜色？ VB 怎么做QQ那样的命令按钮？ vb 里面想用按回车来代替点击命令按钮

vb 单选 命令按钮

vb 单选命令按钮