If條件語句講解

VB中的選擇結構語句有多種，選擇結構是根據給定的條件，選擇執行一個分支的演算法結構。

選擇結構在VB實際程式設計中都經常應用，所以深刻理解並且熟練掌握就顯得非常重要了。

If 選擇語句

第一種形式：

If 條件1 Then

第二種形式：

If 條件1 Then

else

...

end if

第三種形式：







If 條件1 Then

語句塊1

ElseIf 條件2 Then

語句塊2

ElseIf 條件3 Then

語句塊3

ElseIf 條件4 Then

語句塊4

ElseIf 條件5 Then

語句塊5

ElseIf 條件6 Then

語句塊6

ElseIf 條件7 Then

語句塊7

ElseIf 條件8 Then

語句塊8

......

ElseIf 條件n Then

語句塊n

else

語句塊

End If

在 If 語句的“If語句塊”和“Else語句塊”中還可以包含 If 語句。如：

…….

If 條件1 Then

…..

If 條件2 Then

…..

Else

….

End If

…...

Else

…..

If 條件3 Then

…..

Else

….

End If

…….

End If



例：下面的程式用於判斷輸入資料的奇偶性及所在的區間。

Private Sub cmd1_Click( )

Dim int1 As Integer, int2 As Integer

int1=Cint(txt1.Text)

If int1<0 Then

txt2.Text="請輸入一個正整數！"

Else

int2=int1 Mod 2

If int2=0 Then

If int1>100 Then

txt2.Text="這是一個大於100的偶數！"

Else

txt2.Text=“這是一個不大於100的偶數！"

End If

Else

If int1> 100 Then

txt2.Text="這是一個大於100的奇數！"

Else

txt2.Text="這是一個小於100的奇數！"

End If

End If

End If

End Sub