vb关于Msgbox用法

Question

在vb中，用MsgBox 函数参数VbYesNoCancel时,怎样判断选择了"yes"or"no"or"cancel"，
如果选择了"yes",执行某一程序段,如果选择了"no",执行另一程序段,如果选择了"cancel"，返回。

Answer 1

select case msgbox("...",vbyesnocancel)
    case vbyes
     '
    case vbno    case vbcancelend select

Answer 2

判断返回值VbYes、VbNo，还是VbCancel

Answer 3

Option Explicit
晕菜，记得每个分别用vb+提示代替Private Sub Form_Load()
  Dim strMsg As String
  strMsg = MsgBox("测试", vbYesNoCancel, "提示")
  
  If strMsg = vbYes Then Debug.Print "Yes"
  If strMsg = vbNo Then Debug.Print "No"
  If strMsg = vbCancel Then Debug.Print "Cancel"
End Sub

Answer 4

Dim intMsg as Integer
  intMsg = MsgBox(" ", vbYesNoCancel, "提示")
  
  If intMsg = 7 Then 
  ...
  Elseif intMsg = 6 Then
  ...
  Elseif intMsg = 2 Then
  ...
  End If

Answer 5

他们都会返回一个整数的数值的
vbOk = 1
vbCancel = 2
vbAbout = 3
vbRetry = 4
vbIgnor = 5
vbYes = 6
vbNo = 7

Answer 6

Dim bb  As Integer
    bb = MsgBox("判定条件", vbYesNoCancel, "提示")
    If bb = 6 Then 'Yes
        
    ElseIf bb = 2 Then 'CanCel
    
    ElseIf bb = 7 Then 'No
    
    Else
        Exit Sub
    End If