5.4分支結(jié)構(gòu)與分支結(jié)構(gòu)語句
1.if -then 結(jié)構(gòu):(可實現(xiàn)單分支)
一般格式:
格式一: if e then 語句
格式二: if e then
語句組
end if
其中:e 為條件,其形式可為:邏輯變量、關(guān)系表達(dá)式或邏輯表達(dá)式。
功能:執(zhí)行本語句時,判斷 e 的值,若為 true ,則執(zhí)行then 后的語句(語句組),若為 false ,則執(zhí)行本 if 語句(或end if )下面的語句。
程序舉例: 用InputBox 輸入一個數(shù),若此數(shù)大小0,則在窗體上將它顯示出來。
Private Sub Form_click()
Dim x As Integer
x = InputBox(“請輸入一個數(shù)”)
If x > 0 Then Print x
End Sub
2. if-then-else-end if 結(jié)構(gòu):(可實現(xiàn)兩分支)
一般格式:if e then
A 語句組
Else
B 語句組
End if
功能:執(zhí)行本語句時,先判斷 e 的值:
e為 true : 執(zhí)行A語句組后轉(zhuǎn)end if 下一條語句繼續(xù)執(zhí)行。
e 為 false: 執(zhí)行B語句組后轉(zhuǎn)end if 下一條語句繼續(xù)執(zhí)行。
程序舉例:實驗5-3
3. if-then-else if 結(jié)構(gòu):(可實現(xiàn)多分支)
一般格式:if e1 then
A1語句組
Else if e2 then
A2語句組
Else if e3 then
A3語句組
……
Else if en then
An語句組
else
A(n+1)語句組
End if
功能:執(zhí)行本語句時依次判斷各條件的值,
若有 ei 的值為 true ,則執(zhí)行相應(yīng)的 Ai 語句組后轉(zhuǎn)end if 的下一條語句去繼續(xù)執(zhí)行。
若所有ei 的值均為 false ,則執(zhí)行 else 后的 A(n+1) 語句組后轉(zhuǎn)end if 的下一條語句去繼續(xù)執(zhí)行。
(對此功能的理解參考教材P66 圖4-8)
一般來說,ei中最多只有一個值為 true 。
程序舉例:教材 P66 例 4-2
相關(guān)推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |