正确答案是 A
其它答案错
谁帮帮我做成这样,我要代码。
正确答案是 A
其它答案错
谁帮帮我做成这样,我要代码。
Private Sub Command1_Click()
If Option1 = True Then
MsgBox "错误"
ElseIf Option2 = True Then
MsgBox "回答正确"
ElseIf Option3 = True Then
MsgBox "错误"
End If
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Option1_Click()
Option2 = False
Option3 = False
End Sub
Private Sub Option2_Click()
Option1 = False
Option3 = False
End Sub
Private Sub Option3_Click()
Option1 = False
Option2 = False
End Sub