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