VB.Net If...Then...Else语句
VB.Net 决策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
流程图：
示例：
Module decisions
Sub Main()
'local variable definition '
Dim a As Integer = 100
' check the boolean condition using if statement
If (a < 20) Then
' if condition is true then print the following
Console.WriteLine("a is less than 20")
Else
' if condition is false then print the following
Console.WriteLine("a is not less than 20")
End If
Console.WriteLine("value of a is : {0}", a)
Console.ReadLine()
End Sub
End Module
a is not less than 20
value of a is : 100The If...Else If...Else语句
If语句后面可以有一个可选的Else if ... Else语句，这对于使用单个If ... Else If语句测试各种条件非常有用。
当使用If ... Else If ... Else语句时，有几点要记住。
当使用If ... Else If ... Else语句时，有几点要记住。
1、If可以有零个或一个Else，并且它必须在Else If之后。
2、一个If可以有零到许多Else If的，他们必须在Else之前。
3、一旦Else如果成功，则剩余的Else If或Else的任何一个将被测试。
2、一个If可以有零到许多Else If的，他们必须在Else之前。
3、一旦Else如果成功，则剩余的Else If或Else的任何一个将被测试。
语法：
VB.Net中if ... vbnet-else if ... vbnet-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
示例：
Module decisions
Sub Main()
'local variable definition '
Dim a As Integer = 100
' check the boolean condition '
If (a = 10) Then
' if condition is true then print the following '
Console.WriteLine("Value of a is 10") '
ElseIf (a = 20) Then
'if vbnet-else if condition is true '
Console.WriteLine("Value of a is 20") '
ElseIf (a = 30) Then
'if vbnet-else if condition is true
Console.WriteLine("Value of a is 30")
Else
'if none of the conditions is true
Console.WriteLine("None of the values is matching")
End If
Console.WriteLine("Exact value of a is: {0}", a)
Console.ReadLine()
End Sub
End Module
当上述代码被编译和执行时，它产生以下结果：
None of the values is matching
Exact value of a is: 100
