If-Then-Else

If 语句后面可以是一个可选的 Else 语句，当布尔表达式为 false 时执行。

语法：

VB.Net 中 If ... Then ... Else 语句的语法如下：

If(boolean_expression)Then
   'statement(s) will execute if the Boolean expression is true 
Else
  'statement(s) will execute if the Boolean expression is false 
End If

如果布尔表达式的计算结果为 true，则将执行 if 代码块，否则将执行 else 代码块。

流程图：

示例：

Dim a As Integer = 100 If (a < 20) Then Proj.MsgDebug.Add("a is less than 20") Else Proj.MsgDebug.Add("a is not less than 20") End If Proj.MsgDebug.Add("value of a is : {0}", a) '返回结果:a Is Not less than 20 '返回结果:value Of a Is : 100

The If...Else If...Else语句

If 语句后面可以有一个可选的 Else if ... Else 语句，这对于使用单个 If ... Else If 语句测试各种条件非常有用。

当使用 If ... Else If ... Else 语句时，有几点要记住。

1、If 可以有零个或一个 Else，并且它必须在 Else If 之后。

2、一个 If 可以有零到许多 Else If 的，他们必须在 Else 之前。

3、一旦 Else 如果成功，则剩余的 Else If 或 Else 的任何一个将被测试。

语法：

VB.Net 中 if ... else if ... else 语句的语法如下：

If(boolean_expression 1)Then
   ' Executes when the boolean expression 1 is true 
ElseIf( boolean_expression 2)Then
   ' Executes when the boolean expression 2 is true 
ElseIf( boolean_expression 3)Then
   ' Executes when the boolean expression 3 is true 
Else 
   ' executes when the none of the above condition is true 
End If

示例：

Dim a As Integer = 100 If (a = 10) Then Proj.MsgDebug.Add("Value of a is 10") ' ElseIf (a = 20) Then Proj.MsgDebug.Add("Value of a is 20") ' ElseIf (a = 30) Then Proj.MsgDebug.Add("Value of a is 30") Else Proj.MsgDebug.Add("None of the values is matching") End If Proj.MsgDebug.Add("Exact value of a is: {0}", a) '返回结果:None Of the values Is matching '返回结果:Exact value Of a Is: 100