请问各位大虾ElseIf……Then语句  有什么功能

如果 If 语句的条件不能成立，就检测 ElseIf ... Then 语句的条件是否成立。如果成立，则执行 ElseIf ... End If 语句块里的内容。
Else 即"否则"之意，ElseIf ... Then 即意为"否则，如果...那么"。

谢谢~

Private Sub Command1_Click()

If Text1 = "slore" Then
MsgBox "slore"

ElseIf Text1 = "lee" Then
MsgBox "lee"

ElseIf Text1 = "slorelee" Then
MsgBox "slorelee"

Else
MsgBox "wrong"
End If

End Sub


差不多相当于：
Private Sub Command1_Click()

If Text1 = "slore" Then
MsgBox "slore"
End If
If Text1 = "lee" Then
MsgBox "lee"
End If
If Text1 = "slorelee" Then
MsgBox "slorelee"
End If

End Sub

不过else就……

呵呵，有意思啊！~还可以用CASE

IF <表达式1> Then '如果成立则执行语句1
语句1
EsleIf <表达式2> Then '如果语句1不成立则执行语句2
语句2
...
Else
语句3 '如果都不成立则执行语句3
End IF

还可以用Select Case条件语句：
Select Case <表达式>
Case <表达式值1>
...<语句1>
Case <表达式值2>
...<语句2>
Else Case
...<语句3>
End Select

不是 EsleIf，是 ElseIf；不是 Else Case，是 Case Else。

路过，顶一下