VB.Net - If...Then...Else 语句

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

语法

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代码块。

流程图

示例

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 : 100

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

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

使用If... Else If... Else语句时，需要注意以下几点。

• 一个If可以有零个或一个Else，并且它必须出现在Else If之后。

• 一个If可以有零到多个Else If，并且它们必须出现在Else之前。

• 一旦一个Else if成功，则不会测试任何剩余的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

示例

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 else if condition is true '
          Console.WriteLine("Value of a is 20") '
      ElseIf (a = 30) Then
          'if 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