Vb6 如何知道从MsgBox获得的输入？

在VB6中，我试图了解如何从MsgBox中的用户处获取输入

这是我的密码：

Dim myAnswer As Integer

myAnswer = MsgBox("Do you want to buy this upgrade?", vbOKCancel, "Upgrade Description")

MsgBox提供了一个“确定”和“取消”按钮，但我不知道如何判断他们是否单击了“确定”或“取消”。

此处：

Dim myAnswer As Integer
myAnswer = MsgBox("Do you want to buy this upgrade?", vbOKCancel, "Upgrade Description")

If myAnswer = vbOK Then
    MsgBox "You clicked 'OK'."
ElseIf myAnswer = vbCancel Then
    MsgBox "You clicked 'Cancel'."
' ...
End If

MsgBox

函数返回的结果有7个常量：

常量值说明
vbOK 1 OK
vbCancel 2取消
vbAbort 3中止
VB4重试
VB5忽略忽略
是6是
vbNo 7号

参考资料：

---

不要将myAnswer声明为整数，而是将其声明为VbMsgBoxResult，这样您将获得intellisense并更易于编码！