<< 向前        下一页 >>

ID : 132

If...End If

功能

判断If～End If间语句的条件后执行。

格式

If 条件 Then
	'Statemets
ElseIf 条件n Then
	'Statements-n
Else
	'ElseStatements
End If

指定项目

条件
指定条件式。判定“True”/“False”。

解说

指定条件为True：真时，继续执行Statements。使用“ElseIf”可指定多个条件。继续在最初True：真的条件下执行Statements，然后执行“End If”以后的内容。

任何条件均非True：真时，执行“Else”以下的Statements。

相关项目

If...Then...Else、 条件式

注意事项

-

应用示例

'!TITLE "判断If～End If间条件式的条件”
' 判定aaa和bbb的大小
Sub Sample_IfEndIf

  Dim aaa As Integer
  Dim bbb As Integer

  aaa = 1
  bbb = 2

  ' 判定大小
  If aaa < bbb Then

    ' 在讯息输出视窗中显示判定结果( aaa < bbb )
    PrintDbg ( aaa & " < " & bbb )

  End If

End Sub

ID : 132

<< 向前        下一页 >>