If 语句
If语句有三种形式
单分支形式:
If
条件 Then
代码
End If
条件成立的话,则执行代码。
例如在命令窗口输入下面的代码:
Dim
Mark As Integer = 61
If Mark >= 60 Then
Output.Show( "及格")
End If
执行之后,上述的代码会得到结果"及格",如果将变量Mark的值改为59,则不会返回任何内容。
双分支形式:
If
条件 Then
代码1
Else
代码2
End If
条件成立,则执行代码1,不成立,则执行代码2。
例如,在命令窗口输入下面的代码:
Dim
Mark As Integer = 61
If Mark >= 60 Then
Output.Show( "及格")
Else
Output.Show( "不及格")
End If
执行之后,上述的代码会得到结果"及格",如果将变量Mark的值改为59,则会得到结果"不及格"。
多分支形式:
If
条件1 Then
代码1
ElseIf 条件2 Then
代码2
ElseIf 条件3 Then
代码3
.....
Else
代码X
End If
条件1成立,执行代码1,条件2成立,执行代码2,其余类推,所有条件均不成立,则执行代码X。
例如在代码窗口输入:
Dim
Mark As Integer = 90
If Mark >= 90 Then
OutPut.Show("优秀")
ElseIf Mark >= 80 Then
OutPut.Show("良好")
ElseIf Mark >= 60 Then
OutPut.Show("及格")
Else
OutPut.Show("不及格")
End If