If condition Then
' 如果条件为真时执行的代码块
ElseIf anotherCondition Then
' 如果上述条件为假且另一个条件为真时执行的代码块
Else
' 如果所有条件都为假时执行的代码块
End If
- condition 是一个逻辑表达式，如果为真，则执行第一个代码块；否则，继续检查下一个条件（如果存在）。
- ElseIf 部分用于指定另一个条件，如果之前的条件为假且这个条件为真，则执行对应的代码块。
- Else 部分是可选的，用于指定在所有前面的条件都为假时要执行的代码块。
以下是一个简单的例子：
Sub ExampleIfThen()
Dim x As Integer
x = 10
If x > 5 Then
MsgBox "x 大于 5。"
Else
MsgBox "x 不大于 5。"
End If
End Sub
在这个例子中，如果 x 大于 5，将显示 "x 大于 5。" 的消息框，否则将显示 "x 不大于 5。"。
您还可以使用嵌套的 If...Then 语句，将一个条件判断放在另一个条件判断的内部。这有助于处理更复杂的逻辑。例如：
Sub ExampleNestedIfThen()
Dim x As Integer
x = 10
If x > 5 Then
If x < 15 Then
MsgBox "x 大于 5 且小于 15。"
End If
Else
MsgBox "x 不大于 5。"
End If
End Sub
在这个例子中，通过嵌套的 If...Then 语句，我们检查 x 是否大于 5 且小于 15。如果是，则显示相应的消息框。
转载请注明出处：http://www.zyzy.cn/article/detail/291/VBA