ID : 137
If...Then...Else
功能
判断逻辑表达式条件。
格式
If 条件 Then Statement [Else ElseStatement]
指定项目
- 条件
- 指定条件式。
- Statement
- 指定已指定条件为真(True)时执行的语句。
- Else ElseStatement
- 指定已指定条件为假(False)时执行的语句。可省略。如果省略,则条件式为假(False)时,不执行任何动作。
说明
条件指定的条件式为真(True)时,执行Statement。
条件指定的条件式为假(False)时,如果已指定ElseStatement,则执行ElseStatement。
条件指定的条件式为假(False)时,如果未指定ElseStatement,则不执行任何动作。
相关项目
注意事项
-
应用示例
'!TITLE "判断逻辑表达式条件"
' 判定aaa的值,如果为0,则代入1,除此之外,为aaa的2倍
Sub Sample_IfThenElse
Dim aaa As Integer
aaa = 1
If aaa = 0 Then aaa = 1 Else aaa = aaa * 2
' 在讯息输出视窗中显示"1"
PrintDbg aaa
End Sub
If aaa > 0 Then Debug.Print "aaa is Plus" Else "aaa is Minus or 0"
ID : 137