|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
If txtNum.Text = 1 Then
|
|
|
MsgBox(“John”)
|
|
|
ElseIf txtNum.Text = 2 Then
|
|
MsgBox(“Paul”)
|
|
|
ElseIf txtNum.Text = 3 Then
|
|
MsgBox(“George”)
|
|
|
ElseIf txtNum.Text = 4 Then
|
|
MsgBox(“Ringo”)
|
|
|
Else
|
|
|
MsgBox(“Who?”)
|
|
|
EndIf
|
|
|
|
|
|
|
|
|
|
|
|
Executed if Text ¹ 1 and Text = 2
|
|
|
|
|
|
|
Executed if Text ¹ 1 or 2 and Text = 3
|
|
|
|
|
|
|
Executed if Text ¹ 1 or 2 or 3 and Text =
4
|
|
|
|
|
|