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