第3章VisualBasic.NET控制結(jié)構(gòu)VB.Net程序設(shè)計(jì)教程

本章學(xué)習(xí)目標(biāo)：□掌握VisualBasic.Net的順序結(jié)構(gòu)程序設(shè)計(jì)方法□掌握VisualBasic.Net的選擇語(yǔ)句：

IF/Then、IF/Then/Else、Select/Case語(yǔ)句

及選擇語(yǔ)句的嵌套□掌握VisualBasic.Net的循環(huán)語(yǔ)句：

For/Next語(yǔ)句、While語(yǔ)句、Do/Loop語(yǔ)句。3.1 順序結(jié)構(gòu)順序結(jié)構(gòu)的程序設(shè)計(jì)是最簡(jiǎn)單的，只要按照解決問(wèn)題的順序?qū)懗鱿鄳?yīng)的語(yǔ)句就行，它的執(zhí)行順序是自上而下，依次執(zhí)行。如圖3-1，為順序結(jié)構(gòu)的流程圖，執(zhí)行順序?yàn)橄葓?zhí)行A，結(jié)束后再執(zhí)行B。順序結(jié)構(gòu)一般是作為程序的一部分，與其它結(jié)構(gòu)一起構(gòu)成一個(gè)復(fù)雜的程序，例如選擇結(jié)構(gòu)中的復(fù)合語(yǔ)句、循環(huán)結(jié)構(gòu)中的循環(huán)體等。圖3-1順序結(jié)構(gòu)流程圖

【例3-1】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，該應(yīng)用程序由兩個(gè)文本框（TextBox）、兩個(gè)標(biāo)簽（Label）、一個(gè)按鈕（Button）組成。兩個(gè)文本框中輸入a、b的值，單擊按鈕，兩個(gè)文本框中數(shù)值交換，程序運(yùn)行效果如圖3-2所示。左圖為a與b的初始值，右圖為交換a與b值后的運(yùn)行效果。

具體操作步驟和源程序參見(jiàn)教材

【例3-2】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，該應(yīng)用程序由三個(gè)文本框（TextBox）、三個(gè)標(biāo)簽（Label）、一個(gè)按鈕（Button）組成。其中兩個(gè)文本框中輸入長(zhǎng)方形的長(zhǎng)與寬的值，單擊按鈕，計(jì)算長(zhǎng)方形的面積，并把面積數(shù)值輸出到第三個(gè)文本框中。

具體操作步驟和源程序參見(jiàn)教材3.2 選擇語(yǔ)句選擇程序結(jié)構(gòu)用于判斷給定的條件，根據(jù)判斷的結(jié)果來(lái)控制程序的流程。如圖3-4，上圖的邏輯為首先判斷表達(dá)式的真假，如果表達(dá)式值為真則執(zhí)行語(yǔ)句；如果表達(dá)式值為假，跳過(guò)語(yǔ)句，執(zhí)行后續(xù)的語(yǔ)句。下圖的邏輯為首先判斷表達(dá)式的真假，如果表達(dá)式的為真則執(zhí)行語(yǔ)句1；如果表達(dá)式值為假則執(zhí)行語(yǔ)句2。這兩種均為選擇結(jié)構(gòu)的流程圖，根據(jù)表達(dá)式的真假?zèng)Q定程序的執(zhí)行流程。VB.NET提供三種選擇結(jié)構(gòu)：IF/Then、IF/Then/Else和SelectCase。

圖3-4選擇結(jié)構(gòu)流程圖3.2.1IF/Then語(yǔ)句IF/Then語(yǔ)句的其語(yǔ)法格式為：

IF<邏輯表達(dá)式>Then

<語(yǔ)句塊>

EndIF當(dāng)邏輯表達(dá)式為真，執(zhí)行語(yǔ)句塊部分的語(yǔ)句；若邏輯表達(dá)式為假，跳過(guò)IF/Then語(yǔ)句，執(zhí)行后續(xù)語(yǔ)句，其中IF、Then、EndIF均為關(guān)鍵字?！纠?-3】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，判斷一個(gè)學(xué)生成績(jī)是否及格。該應(yīng)用程序由一個(gè)文本框（TextBox）、一個(gè)標(biāo)簽（Label）、一個(gè)按鈕（Button）組成。其中文本框中輸入學(xué)生的成績(jī)，單擊按鈕，如果成績(jī)大于60，則在提示“該學(xué)生成績(jī)及格”。

具體操作步驟和源程序參見(jiàn)教材【例3-4】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，輸入任意三個(gè)數(shù)，按由大到小輸出。該應(yīng)用程序由三個(gè)文本框（TextBox）、三個(gè)標(biāo)簽（Label）、一個(gè)按鈕（Button）組成。三個(gè)文本框輸入三個(gè)數(shù)，單擊按鈕，把這三個(gè)數(shù)由大到小排序。具體操作步驟和源程序參見(jiàn)教材3.2.2IF/Then/Else語(yǔ)句IF/Then/Else語(yǔ)句的流程圖如圖3-4的右圖，其語(yǔ)法格式為：

If<邏輯表達(dá)式>Then

<語(yǔ)句塊1>

Else

<語(yǔ)句塊2>

EndIf當(dāng)邏輯表達(dá)式為真，執(zhí)行語(yǔ)句塊1，若邏輯表達(dá)式為假，執(zhí)行語(yǔ)句塊2。其中If、Then、Else、Endif均為關(guān)鍵字

【例3-5】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，判斷一個(gè)數(shù)是奇數(shù)還是偶數(shù)。該應(yīng)用程序由一個(gè)文本框（TextBox）、一個(gè)標(biāo)簽（Label）、一個(gè)按鈕（Button）組成。文本框輸入待判斷的數(shù)，單擊按鈕，如果這個(gè)數(shù)是偶數(shù)，則輸出“此數(shù)為偶數(shù)”，如果這個(gè)數(shù)是奇數(shù)，則輸出“此數(shù)為奇數(shù)”。

具體操作步驟和源程序參見(jiàn)教材

【例3-6】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，從鍵盤(pán)輸入兩個(gè)數(shù)，輸出兩者的最大值。該應(yīng)用程序由兩個(gè)文本框（TextBox）、一個(gè)標(biāo)簽（Label）、一個(gè)按鈕（Button）組成。文本框輸入待判斷的數(shù)，單擊按鈕，如果這個(gè)數(shù)是偶數(shù)，則輸出“此數(shù)為偶數(shù)”，如果這個(gè)數(shù)是奇數(shù)，則輸出“此數(shù)為奇數(shù)”。

具體操作步驟和源程序參見(jiàn)教材3.2.3多重選擇語(yǔ)句如果要處理多重條件判斷的情況，需要使用多重選擇結(jié)構(gòu)，多重條件結(jié)構(gòu)是If/Then/Else的另一種形式，通過(guò)增加ElseIf子句使其成為多選擇結(jié)構(gòu)，其語(yǔ)法格式為：

If<邏輯表達(dá)式1>Then

<語(yǔ)句塊1>

ElseIf<邏輯表達(dá)式2>Then

<語(yǔ)句塊2>

......

ElseIf<邏輯表達(dá)式n>Then

<語(yǔ)句塊n>

[Else

<語(yǔ)句塊n+1>]

EndIf

【例3-7】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，輸入一個(gè)學(xué)生的成績(jī)，若成績(jī)大于等于90，輸出“優(yōu)秀”，若成績(jī)大于等于80，小于90，輸出“良好”，若成績(jī)大于等于70，小于80，輸出“中等”，若成績(jī)大于等于60，小于70，輸出“及格”，若成績(jī)小于60，輸出“不及格”。該應(yīng)用程序由一個(gè)文本框（TextBox）、一個(gè)標(biāo)簽（Label）、一個(gè)按鈕（Button）組成。文本框輸入學(xué)生的成績(jī)，單擊按鈕，輸出結(jié)果。

具體操作步驟和源程序參見(jiàn)教材

【例3-8】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，輸入三個(gè)數(shù)，找出這三個(gè)數(shù)中的最大的數(shù)。該應(yīng)用程序由三個(gè)文本框（TextBox）、五個(gè)標(biāo)簽（Label）、一個(gè)按鈕（Button）組成。三個(gè)文本框輸入三個(gè)數(shù)，單擊按鈕，找出最大的數(shù)并顯示在一個(gè)Label中。

具體操作步驟和源程序參見(jiàn)教材3.2.4SelectCase語(yǔ)句SelectCase語(yǔ)句是多路判斷語(yǔ)句，它是VB.NET提供的另一個(gè)構(gòu)造多重選擇結(jié)構(gòu)的方法，流程圖如圖3-12，其語(yǔ)法格式為：

SelectCase<控制表達(dá)式>

Case<表達(dá)式列表1>

<語(yǔ)句塊1>

Case<表達(dá)式列表2>

<語(yǔ)句塊2> ......

Case<表達(dá)式列表n>

<語(yǔ)句塊n>

[CaseElse<表達(dá)式列表1>

<語(yǔ)句塊n+1>]

EndSelect注意：（1）CaseElse不是必須的，根據(jù)情況可以省略；（2）Select后面的表達(dá)式可以是算術(shù)表達(dá)式或字符；（3）控制表達(dá)式類(lèi)型必須與匹配表達(dá)式列表類(lèi)型一致，可以是一個(gè)具體值或是以下四種情況之一：一組逗號(hào)分隔的特定序列，例如：1，3，5或A，B，C 連續(xù)的數(shù)據(jù)區(qū)間，例如1TO4或xTOz 滿足某個(gè)判斷條件式，例如：Is<20、Is>"F" 可以是上述組合，但應(yīng)用逗號(hào)分隔，例如：Case1，3，5，1TO4，Is<20

【例3-9】使用SelectCase語(yǔ)句重新實(shí)現(xiàn)例3-7。

具體操作步驟和源程序參見(jiàn)教材

【例3-10】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，編寫(xiě)一個(gè)簡(jiǎn)單的計(jì)算器，實(shí)現(xiàn)兩個(gè)整型數(shù)的四則運(yùn)算。該應(yīng)用程序由四個(gè)文本框（TextBox）、五個(gè)標(biāo)簽（Label）、一個(gè)按鈕（Button）組成。其中三個(gè)文本框輸入兩個(gè)操作數(shù)及操作符，單擊按鈕，計(jì)算結(jié)果并顯示在文本框中。

具體操作步驟和源程序參見(jiàn)教材3.2.5IIf函數(shù)IIf函數(shù)根據(jù)表達(dá)式的值，來(lái)返回兩部分中的其中一個(gè)，其語(yǔ)法為：IIf(expr,truepart,falsepart)

expr：具有真值或假值的表達(dá)式。

truepart：如果expr為T(mén)rue，則返回這部分的值或表達(dá)式。

falsepart：如果expr為False，則返回這部分的值或表達(dá)式。

例：輸出一學(xué)生成績(jī)是否及格，語(yǔ)句為：

Debug.Write(IIf(G>=60，“合格”，“不合格”))注意：

在IIf語(yǔ)句中計(jì)算truepart和falsepart，雖然它只返回其中的一個(gè)。但如果falsepart產(chǎn)生一個(gè)被零除錯(cuò)誤，那么程序就會(huì)發(fā)生錯(cuò)誤，即使expr為T(mén)rue。3.3 循環(huán)語(yǔ)句3.3.1For/Next語(yǔ)句For/Next語(yǔ)句是VB的傳統(tǒng)語(yǔ)句，也是最經(jīng)典的構(gòu)造循環(huán)結(jié)構(gòu)的語(yǔ)句，通常在已知循環(huán)次數(shù)的情況下使用這種計(jì)數(shù)循環(huán)語(yǔ)句結(jié)構(gòu)。語(yǔ)句格式為：

For<循環(huán)變量>=<初值>TO<終值>[Step<步長(zhǎng)>]

<循環(huán)體>

Next[<循環(huán)變量>]

其中：循環(huán)變量、初值、終值、步長(zhǎng)為數(shù)值型變量或相應(yīng)的有效表達(dá)式。For、To、Next是必須的關(guān)鍵字，等號(hào)（=）也不能省略注意：當(dāng)步長(zhǎng)值為1，[Step<步長(zhǎng)>]這部分可以省略。只有當(dāng)循環(huán)變量超出初值與終值的限定區(qū)間時(shí)，終止循環(huán)。當(dāng)初值、終值、步長(zhǎng)值是變量時(shí)，如果在循環(huán)體內(nèi)修改這些變量值，將不會(huì)影響循環(huán)次數(shù)，因?yàn)檫@些變量值在For語(yǔ)句中已經(jīng)被引用。但如果修改循環(huán)變量值，將會(huì)影響循環(huán)次數(shù)。Next后面的循環(huán)變量可以省略【例3-11】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，求1+3+……+99，并輸出結(jié)果。

具體操作步驟和源程序參見(jiàn)教材【例3-12】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，找出所有的水仙花數(shù)并輸出。水仙花數(shù)是一個(gè)三位數(shù)正整數(shù)，其各位的立方和恰好等于該數(shù)本身，例如153=13+53+33。

具體操作步驟和源程序參見(jiàn)教材3.3.2While語(yǔ)句While循環(huán)結(jié)構(gòu)的語(yǔ)法格式為：

While<邏輯表達(dá)式>

<循環(huán)體>

EndWhile首先執(zhí)行While后的邏輯表達(dá)式，若結(jié)果為T(mén)rue，則執(zhí)行循環(huán)體，然后再次執(zhí)行邏輯表達(dá)式，重復(fù)執(zhí)行上述過(guò)程……。當(dāng)某一次執(zhí)行邏輯表達(dá)式，值為False時(shí)，退出循環(huán)結(jié)構(gòu)，轉(zhuǎn)入循環(huán)結(jié)構(gòu)后續(xù)程序執(zhí)行。只要條件表達(dá)式成立就執(zhí)行循環(huán)體語(yǔ)句，不一定非有循環(huán)變量控制循環(huán)次數(shù)，因此適合于循環(huán)次數(shù)不確定場(chǎng)合?！纠?-13】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，求1+2+……+100，并輸出結(jié)果。

具體操作步驟和源程序參見(jiàn)教材【例3-14】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，求n!=1*2*3*….*n，并輸出結(jié)果。

具體操作步驟和源程序參見(jiàn)教材3.3.3Do/Loop語(yǔ)句圖3-21當(dāng)型循環(huán)流程圖圖3-22直到型循環(huán)流程圖

對(duì)于事先不知道循環(huán)要執(zhí)行多少次的情況來(lái)說(shuō)，Do/Loop循環(huán)十分有用和方便。Do/Loop循環(huán)有兩種語(yǔ)法格式，為前測(cè)型Do/Loop循環(huán)和后測(cè)型Do/Loop循環(huán)。

(1)前測(cè)型Do/Loop循環(huán)

語(yǔ)法格式為：

Do[while|until]循環(huán)條件

循環(huán)體

Loop

若選用while條件，稱(chēng)為當(dāng)型循環(huán)，此時(shí)當(dāng)循環(huán)條件為真時(shí)，執(zhí)行循環(huán)體；然后再判斷循環(huán)條件，當(dāng)循環(huán)條件為假時(shí)，循環(huán)結(jié)束。其流程圖如圖3-21。

若選用until條件，成為直到型循環(huán)，此時(shí)當(dāng)循環(huán)條件為假時(shí)，執(zhí)行循環(huán)體，當(dāng)循環(huán)條件為真時(shí)，結(jié)束循環(huán)。其流程圖如圖3-22?！纠?-15】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，用公式計(jì)算л的近似值，直到最后一項(xiàng)的絕對(duì)值小于1E-6為止。

具體操作步驟和源程序參見(jiàn)教材(2)后測(cè)型Do/Loop循環(huán)語(yǔ)法格式：Do循環(huán)體Loop[while|until]循環(huán)條件

后測(cè)型Do/Loop循環(huán)中的while、until與前測(cè)型中的while、until用法相同，while為當(dāng)型循環(huán)，until為直到型循環(huán)。后測(cè)型循環(huán)與前測(cè)型循環(huán)的區(qū)別在于前測(cè)型循環(huán)的循環(huán)體可能一次也不執(zhí)行，而后測(cè)型循環(huán)的循環(huán)體至少要執(zhí)行一次?！纠?-16】使用后測(cè)型循環(huán)重新實(shí)現(xiàn)例3-15。具體操作步驟和源程序參見(jiàn)教材3.3.4ForEach/Next語(yǔ)句ForEach...Next循環(huán)與For...Next循環(huán)類(lèi)似，但它對(duì)數(shù)組或?qū)ο蠹现械拿恳粋€(gè)元素重復(fù)一組語(yǔ)句，而不是重復(fù)語(yǔ)句一定的次數(shù)。如果不知道一個(gè)集合有多少元素，F(xiàn)orEach...Next循環(huán)非常有用。ForEach/Next循環(huán)的語(yǔ)法為：

ForEachelementingroup

statements

Nextelement說(shuō)明：

對(duì)于集合或數(shù)組中的元素，element既可以是普通的Object類(lèi)型，也可以是特殊的Object對(duì)象。group可以是數(shù)組，也可以是一個(gè)集合。3.3.5循環(huán)的強(qiáng)制退出

VB.NET提供了ExitDo、ExitWhile、ExitFor語(yǔ)句。ExitDo用于退出Do/Loop構(gòu)造的循環(huán)結(jié)構(gòu)。ExitWhile用于退出While構(gòu)造的循環(huán)結(jié)構(gòu)。ExitFor用于退出For/Next構(gòu)造的循環(huán)結(jié)構(gòu)。以下示例說(shuō)明它們的用法。

【例3-17】創(chuàng)建一個(gè)簡(jiǎn)單應(yīng)用程序，隨機(jī)產(chǎn)生1-100之間的整數(shù)，如果此數(shù)能被7整除，程序結(jié)束，顯示這個(gè)能被7整除的數(shù)。如果隨機(jī)產(chǎn)生的數(shù)已達(dá)到10個(gè)還沒(méi)有找到能被7整除的數(shù)，程序結(jié)束，顯示“沒(méi)找到能被7整除的數(shù)”。

具體操作步驟和源程序參見(jiàn)教材