大耳朵图图睡前故事:VB6中小小的问题,请指点。

来源:百度文库 编辑:高考问答 时间:2024/05/01 19:52:44
Private Sub Command1_Click()
If Option1.Value = True Then
MsgBox "答对了", vbOKOnly, "结果"
End
Else
MsgBox "答错了", vbOKOnly, "结果"
End If
End Sub
是一个问答题,当单击确定时,显示你的选择对与错。
问题补充:提示Option1.Value 这里有问题,可我把Option1改成option2它又对了,这是怎么回事呢?
还有,我Form中有Option1这个控件。所以才搞不懂。

不能用Option1.Value = True啊!!
这句代码有问题!!
Option1.Value没有TRUE这个值!

刚才没有给你说好
你有点一下option1
那是不是单选,你在选中才有

程序没问题,可能是控件有问题,最简单办法把Option1删掉,重新建试试,再不行,重建一个工程。

If Option1.Value = True Then
MsgBox "答对了", vbOKOnly, "结果"

Else
MsgBox "答错了", vbOKOnly, "结果"
End If
End Sub