VB如何设置

来源:百度知道 编辑:UC知道 时间:2024/06/03 03:49:30
点击Command1 假如是勾上Option1 就弹您答对了 如果事勾上Option2 就弹您答错了

Private sub command1_click()
if option1.value=true then
msgbox "您答对了"
elseif option2.value=true then
msgbox "您答错了"
end if
end sub

Private sub command1_click()
if option1.value=true then
msgbox "您答对了!" , vbInformation + vbOKOnly, "提示"
else
if option2.value=true then
msgbox "您答错了!" , vbInformation + vbOKOnly, "提示"
end if
end if
end sub