我目前正在制作Excel VB应用程序。但是,我现在卡住了。我试图在两个OptionButtons之间做出必选的选择。
我尝试了代码
If Me.PWebOption.Value = False & Me.BWebOption = False Then
MsgBox "Please choose a type of website"
Exit Sub
End If
但这并没有给我所需的结果。我试着将它们放在括号中,但仍然卡住了。我确信这是一个微不足道的答案,但我只是想要掌握VB,所以请原谅我。
非常感谢提前。
答案 0 :(得分:1)
我不确定它是否是复制/粘贴错误,但在第一部分中您正在调用.Value
,而在第二部分中您只是使用该选项本身。你的代码应该是这样吗:
If Me.PWebOption.Value = False & Me.BWebOption.Value = False Then
MsgBox "Please choose a type of website"
Exit Sub
End If
(请注意,它在两个选项上都使用.Value
。)
答案 1 :(得分:1)
我尝试了您的代码,如果您更改&到和。我创建了2个OptionButtons,将它们命名并用“And”运行代码没有问题。
如果它仍然不起作用那么我的猜测是:
或:
尝试
Debug.Print Me.PWebOption.Value
Debug.Print Me.BWebOption.Value
Debug.Print Me.PWebOption 'just for fun'
Debug.Print Me.BWebOption
它应该都返回false。还可以尝试将Option Explicit
放在代码的头部,以确保您只访问实际存在的对象。
注意:在VBA&仅用于连接和:和Or和Not是逻辑运算符。