第3章-Visual-Basic.NET控制結構ppt課件(全)

第3章VisualBasic.NET控制結構VB.Net程序設計教程

本章學習目標：□掌握VisualBasic.Net的順序結構程序設計方法□掌握VisualBasic.Net的選擇語句：

IF/Then、IF/Then/Else、Select/Case語句

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

For/Next語句、While語句、Do/Loop語句。3.1 順序結構順序結構的程序設計是最簡單的，只要按照解決問題的順序寫出相應的語句就行，它的執(zhí)行順序是自上而下，依次執(zhí)行。如圖3-1，為順序結構的流程圖，執(zhí)行順序為先執(zhí)行A，結束后再執(zhí)行B。順序結構一般是作為程序的一部分，與其它結構一起構成一個復雜的程序，例如選擇結構中的復合語句、循環(huán)結構中的循環(huán)體等。圖3-1順序結構流程圖

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

具體操作步驟和源程序參見教材

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

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

圖3-4選擇結構流程圖3.2.1IF/Then語句IF/Then語句的其語法格式為：

IF<邏輯表達式>Then

<語句塊>

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

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

If<邏輯表達式>Then

<語句塊1>

Else

<語句塊2>

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

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

具體操作步驟和源程序參見教材

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

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

If<邏輯表達式1>Then

<語句塊1>

ElseIf<邏輯表達式2>Then

<語句塊2>

......

ElseIf<邏輯表達式n>Then

<語句塊n>

[Else

<語句塊n+1>]

EndIf

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

具體操作步驟和源程序參見教材

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

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

SelectCase<控制表達式>

Case<表達式列表1>

<語句塊1>

Case<表達式列表2>

<語句塊2> ......

Case<表達式列表n>

<語句塊n>

[CaseElse<表達式列表1>

<語句塊n+1>]

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

【例3-9】使用SelectCase語句重新實現例3-7。

具體操作步驟和源程序參見教材

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

具體操作步驟和源程序參見教材3.2.5IIf函數IIf函數根據表達式的值，來返回兩部分中的其中一個，其語法為：IIf(expr,truepart,falsepart)

expr：具有真值或假值的表達式。

truepart：如果expr為True，則返回這部分的值或表達式。

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

例：輸出一學生成績是否及格，語句為：

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

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

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

<循環(huán)體>

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

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

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

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

While<邏輯表達式>

<循環(huán)體>

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

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

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

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

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

語法格式為：

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

循環(huán)體

Loop

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

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

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

后測型Do/Loop循環(huán)中的while、until與前測型中的while、until用法相同，while為當型循環(huán)，until為直到型循環(huán)。后測型循環(huán)與前測型循環(huán)的區(qū)別在于前測型循環(huán)的循環(huán)體可能一次也不執(zhí)行，而后測型循環(huán)的循環(huán)體至少要執(zhí)行一次?！纠?-16】使用后測型循環(huán)重新實現例3-15。具體操作步驟和源程序參見教材3.3.4ForEach/Next語句ForEach...Next循環(huán)與For...Next循環(huán)類似，但它對數組或對象集合中的每一個元素重復一組語句，而不是重復語句一定的次數。如果不知道一個集合有多少元素，ForEach...Next循環(huán)非常有用。ForEach/Next循環(huán)的語法為：

ForEachelementingroup

statements

Nextelement說明：

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

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

【例3-17】創(chuàng)建一個簡單應用程序，隨機產生1-100之間的整數，如果此數能被7整除，程序結束，顯示這個能被7整除的數。如果隨機產生的數已達到10個還沒有找到能被7整除的數，程序結束，顯示“沒找到能被7整除的數”。

具體操作步驟和源程序參見教材