vb初学者的消息框问题

来源：百度知道 编辑：UC知道 时间：2024/06/24 14:51:20
要求：写一个小程序主要是练习消息框的应用，我写了一段代码，但是不知道开头这么写，请帮忙下，代码：
If info = 1 Then
info1 = MsgBox("选择了按钮（是）", 64, "消息框")
If info = 7 Then
info2 = MsgBox("选择了按钮（否）", 64, "消息框")
If info = 2 Then
nifo3 = MsgBox("选择了按钮（取消）", 64, "消息框")
开头怎么写？随便怎么都可以，只要能正确运行就可以。
谢谢
这段代码没问题吧。有问题请说下，谢谢，有谁能愿意教我的吗？
我感激不尽
楼下2层的也是“info未定义”怎么解决

Private Sub Form_Click()
info1 = MsgBox("测试msgbox函数", 3, "消息框")
If info1 = 6 Then
MsgBox "选择了“是”"
Exit Sub
End If
If info1 = 7 Then
MsgBox "选择了“否”"
Exit Sub
End If
If info1 = 2 Then
MsgBox "选择了“取消”"
Exit Sub
End If
End Sub

你的写法是有问题的.msgbox的用法可以是:
变量=msgbox.........
然后根据变量的值来判断选择了是什么按钮.
而你先给变量赋值,然后在来info1=msgbox....
此时info1的值要根据你的选择来确定的.所以之前的赋值没有任何意义.

print MsgBox("选择一个按钮", vbYesNoCancel, "消息框")

'------------------------------------------------------------
a=MsgBox("选择一个按钮", vbYesNoCancel, "消息框")
select case a
case vbyes
print "选择了（是）"
case vbno
print "选择了（否）"
case vbcancel
print "选择了（取消）"
end select

看不明白你的问题是什么意思，你想要什么结果？