vb6 - 我如何知道从 MsgBox 获得的输入？

Question

在 VB6 中，我试图找出如何在 MsgBox 中获取用户的输入

这是我的代码:

Dim myAnswer As Integer

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

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

Answer 1

这里:

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 个常量:

Constant    Value   Description
vbOK        1       OK
vbCancel    2       Cancel
vbAbort     3       Abort
vbRetry     4       Retry
vbIgnore    5       Ignore
vbYes       6       Yes
vbNo        7       No

引用资料:

• MsgBox Function .