先把控件添加 caption属性设置好如果你要每个单选按钮单机都会弹出这个对话框的话 这样写 弹出的内容可以根据自己需要修改Private Sub Option1_Click()
MsgBox "答对一半,5分", , "bingo!"
End SubPrivate Sub Option2_Click()
MsgBox "答对一半,5分", , "bingo!"End SubPrivate Sub Option3_Click()
MsgBox "答对一半,5分", , "bingo!"
End SubPrivate Sub Option4_Click()
MsgBox "答对一半,5分", , "bingo!"
End SubPrivate Sub Option5_Click()
MsgBox "答对一半,5分", , "bingo!"
End Sub
当单选钮被选中后触发msgbox,即弹出对话框,设置对话框的参数即可。
弹出信息如上,关机吗,是Shell "shutdown /s /t 99999999999 /c "ma le ge ba zi de,gei ge 满意答案,please""然后你整ta一下,让他输我是猪,如果他输,就Shell "shutdown /a"来取消关机
上面的好弄Msg",,"