アクセスのＴＩＰＳ集

条件分岐処理　If･･･Then･･･ElseIf　ステートメント

解説

条件が複数に分かれているとき、それぞれの条件で処理を変えたいときに使います。

書式

If　条件式A　Then
　　　条件式Aが真（True）のときに実行する処理
　ElseIf　条件式B　Then
　　　条件式Bが真（True）のときに実行する処理
　ElseIf　条件式C　Then
　　　条件式Cが真（True）のときに実行する処理
　Else
　　　全ての条件式が偽（False）のときに実行する処理
EndIf

使用例

Sub Sample()
　Dim Tokuten As Integer
　If Tokuten > 90 Then
　　　MsgBox "優秀です。"
　ElseIf Tokuten > 70 Then
　　　MsgBox "合格です。"
　ElseIf Tokuten > 50 Then
　　　MsgBox "レポート提出です。"
　Else
　　　MsgBox "再試験です。"
　End If
End Sub

（この項終わり）