VB語言程序設(shè)計(jì)第4章 VB程序控制結(jié)構(gòu)

1、精選ppt第4章 VB程序控制結(jié)構(gòu)n面向?qū)ο蟪绦蛟O(shè)計(jì)n事件驅(qū)動(dòng)方法精選ppt4.1 算法概述n應(yīng)用程序應(yīng)用程序=用戶界面用戶界面+ +程序代碼程序代碼n代碼被組織成一個(gè)個(gè)過程代碼被組織成一個(gè)個(gè)過程n過程分為過程分為事件過程事件過程和通用過程和通用過程( (第六章第六章) )n過程過程=操作規(guī)則操作規(guī)則+ +對(duì)操作對(duì)象的說明對(duì)操作對(duì)象的說明精選ppt4.1 算法概述v 算法概念算法概念：廣義地說，為解決一個(gè)問題而采：廣義地說，為解決一個(gè)問題而采取的方法和步驟。取的方法和步驟。精選ppt算法的特性1.可行性可行性:算法中的每一個(gè)步驟都應(yīng)當(dāng)能有效地執(zhí)行，并得到確算法中的每一個(gè)步驟都應(yīng)當(dāng)能有效地執(zhí)行，

2、并得到確定的結(jié)果。定的結(jié)果?！氨热绯龜?shù)不能為比如除數(shù)不能為0”2.確定性確定性:算法中的每一個(gè)步驟都應(yīng)當(dāng)是確定的，而不應(yīng)當(dāng)是含算法中的每一個(gè)步驟都應(yīng)當(dāng)是確定的，而不應(yīng)當(dāng)是含糊的、模棱兩可的。糊的、模棱兩可的。3.有窮性有窮性:一個(gè)算法應(yīng)包含有限的操作步驟，而不能是無限的。一個(gè)算法應(yīng)包含有限的操作步驟，而不能是無限的。4.輸入性輸入性(有零個(gè)或多個(gè)輸入有零個(gè)或多個(gè)輸入):是指在執(zhí)行算法時(shí)需要從外界取是指在執(zhí)行算法時(shí)需要從外界取得必要的信息。一個(gè)算法也可以沒有輸入。得必要的信息。一個(gè)算法也可以沒有輸入。5. 輸出性輸出性(有一個(gè)或多個(gè)輸出有一個(gè)或多個(gè)輸出):算法的目的是為了求解，算法的目的是為了求

3、解，“解解” 就是輸出。沒有輸出的算法是沒有意義的。就是輸出。沒有輸出的算法是沒有意義的。精選ppt算法的表示自然語言(漢語、英語)代碼符號(hào)(VB語言)圖形(流程圖、PAD圖、NS圖)精選ppt圖形符號(hào)表表示與流程圖其他部分相連接連接點(diǎn)連接各個(gè)圖框,表示執(zhí)行順序流程線一個(gè)定義過的過程特定過程流程的起點(diǎn)和終點(diǎn)起止判斷選擇,根據(jù)條件滿足與否選擇不同路徑判斷各種形式的數(shù)據(jù)處理處理數(shù)據(jù)的輸入和輸出輸入/輸出代表的操作名稱圖形符號(hào)精選ppt基本算法結(jié)構(gòu)結(jié)構(gòu)化程序設(shè)計(jì)的三種基本結(jié)構(gòu):n順序結(jié)構(gòu)n選擇結(jié)構(gòu)n循環(huán)結(jié)構(gòu)精選ppt順序順序結(jié)構(gòu)結(jié)構(gòu)eABTF選擇結(jié)構(gòu)選擇結(jié)構(gòu)n n選擇結(jié)構(gòu)，或稱選取結(jié)構(gòu)，或稱分支結(jié)選

4、擇結(jié)構(gòu)，或稱選取結(jié)構(gòu)，或稱分支結(jié)構(gòu)。構(gòu)。A或或B中可以有一個(gè)是空的。中可以有一個(gè)是空的。精選ppt補(bǔ)全下面的流程圖-開始(結(jié)束)輸入(輸出)精選ppt 循環(huán)結(jié)構(gòu)當(dāng)型當(dāng)型(While型型)循環(huán)結(jié)構(gòu)循環(huán)結(jié)構(gòu)直到型直到型(Until型型)循環(huán)循環(huán)精選ppt三種基本結(jié)構(gòu)共同特點(diǎn)：(1) 只有一個(gè)入口。只有一個(gè)入口。(2) 只有一個(gè)出口。（注意，一個(gè)菱形判只有一個(gè)出口。（注意，一個(gè)菱形判斷框有兩個(gè)出口，而斷框有兩個(gè)出口，而一個(gè)選擇結(jié)構(gòu)只有一個(gè)選擇結(jié)構(gòu)只有一個(gè)出口一個(gè)出口。）。）(3)無死語句（永遠(yuǎn)執(zhí)行不到的語句）。無死語句（永遠(yuǎn)執(zhí)行不到的語句）。(4) 無無“死循環(huán)死循環(huán)”(永遠(yuǎn)執(zhí)行不完永遠(yuǎn)執(zhí)行不完的循

5、環(huán)的循環(huán))。精選ppt4.2 順序結(jié)構(gòu)程序設(shè)計(jì)n按語句出現(xiàn)的按語句出現(xiàn)的次序次序從上到下執(zhí)行從上到下執(zhí)行n輸入輸入 處理處理 輸出輸出處處理理輸輸入入輸輸出出輸入信息輸入信息 計(jì)算機(jī)計(jì)算機(jī) 輸出信息輸出信息精選ppt1. 賦值語句n用于將指定的值賦給變量或?qū)ο髮傩杂糜趯⒅付ǖ闹蒂x給變量或?qū)ο髮傩?nn=n+1 將變量將變量n的值加的值加1后的結(jié)果再賦給變后的結(jié)果再賦給變量量n Text1.fontsize=text1.fontsize+5n變量或?qū)ο髮傩灶愋蛻?yīng)與表達(dá)式類型變量或?qū)ο髮傩灶愋蛻?yīng)與表達(dá)式類型相容相容 (x%=11/4 y%=“123.45”). 相容時(shí)相容時(shí),將將表達(dá)式的結(jié)果轉(zhuǎn)換為

6、變量的類型表達(dá)式的結(jié)果轉(zhuǎn)換為變量的類型*建議自己寫程序時(shí)盡量不要出現(xiàn)左右類型不符建議自己寫程序時(shí)盡量不要出現(xiàn)左右類型不符的情況的情況.精選ppt邏輯型(Boolean)數(shù)據(jù) Boolean型用于邏輯判斷，它只有True和 False兩個(gè)值。 P58例例1 布爾與整型的關(guān)系布爾與整型的關(guān)系邏輯數(shù)據(jù)邏輯數(shù)據(jù)整型變量整型變量True 轉(zhuǎn)為轉(zhuǎn)為 -1 False 轉(zhuǎn)為轉(zhuǎn)為0賦值給整型數(shù)據(jù)整型數(shù)據(jù)邏輯變量邏輯變量非非0數(shù)數(shù)轉(zhuǎn)為轉(zhuǎn)為 True0 轉(zhuǎn)為轉(zhuǎn)為 False賦值給Dim b As Boolean, n As Integerb = 1Print bb = 0Print bn = bPrint nb

7、= 3Print bn = bPrint n精選pptnVal函數(shù)功能-將數(shù)字字符串轉(zhuǎn)換為數(shù)值精選ppt例例3 重點(diǎn)算法重點(diǎn)算法：設(shè)計(jì)算法交換兩個(gè)變量：設(shè)計(jì)算法交換兩個(gè)變量a和和b的值的值n現(xiàn)有兩個(gè)杯子，分別裝有奶茶和水，請(qǐng)交換兩個(gè)杯現(xiàn)有兩個(gè)杯子，分別裝有奶茶和水，請(qǐng)交換兩個(gè)杯子里的液體。子里的液體。n輸入輸入a和和b的值（的值（賦值，隨機(jī)數(shù)，賦值，隨機(jī)數(shù)，inputbox函數(shù)函數(shù)等）等）n交換交換n輸出輸出a和和b的值（的值（print textBox Msgbox) 思考思考:如何交換兩文本框中信息如何交換兩文本框中信息?如何交換兩圖片框中圖形如何交換兩圖片框中圖形?精選ppt例4 求水仙

8、花數(shù)n三位正整數(shù)三位正整數(shù)n各位數(shù)字立方和等于該數(shù)本身各位數(shù)字立方和等于該數(shù)本身關(guān)鍵:如何獲得各位數(shù)字?精選ppt與Print方法有關(guān)的Tab函數(shù)n為了使信息按指定的格式輸出，為了使信息按指定的格式輸出，VB提供了幾提供了幾個(gè)與個(gè)與print配合使用的函數(shù)配合使用的函數(shù)格式：格式：Tab(n) 把把光標(biāo)光標(biāo)移到參數(shù)移到參數(shù)n指定的位置開指定的位置開始輸出信息。始輸出信息。例如：例如：Print Tab(10);25 將在第將在第10個(gè)字符位置處輸出個(gè)字符位置處輸出25例例4.2 請(qǐng)大家在請(qǐng)大家在VB中輸入代碼理解中輸入代碼理解Tab與與String函數(shù)函數(shù)精選ppt4.3 選擇結(jié)構(gòu)n對(duì)給定的條

9、件進(jìn)行分析、比較和判斷，根據(jù)判對(duì)給定的條件進(jìn)行分析、比較和判斷，根據(jù)判斷結(jié)果采取不同的操作。斷結(jié)果采取不同的操作。n上述問題通過上述問題通過選擇結(jié)構(gòu)選擇結(jié)構(gòu)程序來解決，而選擇結(jié)程序來解決，而選擇結(jié)構(gòu)通過構(gòu)通過條件語句條件語句來實(shí)現(xiàn)來實(shí)現(xiàn):IF語句和語句和Select Case語句。語句。nIf語句包括語句包括：單分支結(jié)構(gòu)；雙分支結(jié)構(gòu)；多分：單分支結(jié)構(gòu)；雙分支結(jié)構(gòu)；多分支結(jié)構(gòu)。支結(jié)構(gòu)。精選pptIf語句n單分支n雙分支n多分支精選ppt分支結(jié)構(gòu)分支結(jié)構(gòu) 一般形式如下：一般形式如下： If e Then 語句塊語句塊 End If等價(jià)于等價(jià)于 If e Then End If為為區(qū)別于區(qū)別于單行結(jié)

10、構(gòu)語句的特征單行結(jié)構(gòu)語句的特征.其中其中e為判斷條件為判斷條件, 可以是可以是關(guān)系表達(dá)式關(guān)系表達(dá)式、邏邏輯表達(dá)式輯表達(dá)式、數(shù)值表達(dá)式或字符串表達(dá)式。、數(shù)值表達(dá)式或字符串表達(dá)式。e語句塊TF精選ppt單分支結(jié)構(gòu)應(yīng)用 【例例1】由鍵盤輸入任一實(shí)數(shù)，若為負(fù)數(shù)，則由鍵盤輸入任一實(shí)數(shù)，若為負(fù)數(shù)，則通過通過消息框消息框提示用戶提示用戶“您輸入的是一個(gè)負(fù)數(shù)您輸入的是一個(gè)負(fù)數(shù)”。最后在當(dāng)前窗體中輸出用戶輸入的數(shù)值。最后在當(dāng)前窗體中輸出用戶輸入的數(shù)值。精選ppt雙雙分支結(jié)構(gòu)分支結(jié)構(gòu)一般形式如下：一般形式如下：If e Then Else End If等價(jià)于等價(jià)于If e Then Else 【例【例2】 輸出兩

11、整數(shù)中的輸出兩整數(shù)中的較大較大數(shù)。數(shù)。e語句塊1語句塊2TF精選ppt分支塊結(jié)構(gòu)分支塊結(jié)構(gòu)假如假如中了中了50萬萬那么那么買輛雅閣本田買輛雅閣本田另外假如另外假如中了中了100萬萬那么那么 買輛寶馬買輛寶馬另外假如另外假如中了中了400萬萬那么那么 買輛法拉利買輛法拉利另外、反之（沒中獎(jiǎng)）另外、反之（沒中獎(jiǎng)） 天天電動(dòng)車天天電動(dòng)車結(jié)束假如結(jié)束假如精選pptIf Then ElseIf ThenEnd If ElseIf Then Else-應(yīng)用時(shí)根據(jù)需要應(yīng)用時(shí)根據(jù)需要對(duì)條件進(jìn)行增減對(duì)條件進(jìn)行增減假如假如中了中了50萬萬那么那么買輛雅閣本田買輛雅閣本田另外假如另外假如中了中了100萬萬那么那么

12、買輛寶馬買輛寶馬另外假如另外假如中了中了400萬萬那么那么 買輛法拉利買輛法拉利另外、反之（沒中獎(jiǎng)）另外、反之（沒中獎(jiǎng)） 天天電動(dòng)車天天電動(dòng)車結(jié)束假如結(jié)束假如多多分支塊結(jié)構(gòu)分支塊結(jié)構(gòu)精選ppt多分支結(jié)構(gòu)應(yīng)用【例3】給定一個(gè)百分制成績的分?jǐn)?shù)，編程實(shí)現(xiàn)顯示對(duì)應(yīng)的五級(jí)制成績。20,Is20 即一個(gè)即一個(gè)case語句中允許有多個(gè)語句中允許有多個(gè)測試項(xiàng)，項(xiàng)與項(xiàng)之間用逗號(hào)分隔。測試項(xiàng)，項(xiàng)與項(xiàng)之間用逗號(hào)分隔。本結(jié)構(gòu)本結(jié)構(gòu)執(zhí)行方式執(zhí)行方式： 先求測試表達(dá)式的值，接著逐個(gè)檢查每先求測試表達(dá)式的值，接著逐個(gè)檢查每個(gè)個(gè)case語句的測試項(xiàng)，如果測試表達(dá)式的語句的測試項(xiàng)，如果測試表達(dá)式的值滿足某個(gè)測試項(xiàng)中的任意一個(gè)測

13、試內(nèi)容，值滿足某個(gè)測試項(xiàng)中的任意一個(gè)測試內(nèi)容，系統(tǒng)就執(zhí)行該系統(tǒng)就執(zhí)行該case語句下的那組語句語句下的那組語句,然后然后執(zhí)行執(zhí)行End Select下面的語句；若沒有一個(gè)下面的語句；若沒有一個(gè)測試項(xiàng)滿足要求，就執(zhí)行測試項(xiàng)滿足要求，就執(zhí)行Case Else 下的語下的語句。句。精選ppt例例5:變量變量strC中存放了一個(gè)字符，判斷該字符類型。中存放了一個(gè)字符，判斷該字符類型。用用SelectCase語句實(shí)現(xiàn)語句實(shí)現(xiàn):DimstrCasstring*1如何獲得如何獲得strC？ SelectCasestrCCaseaToz，AToZPrintstrC+是字母字符Case0To9PrintstrC

14、+是數(shù)字字符CaseElsePrintstrC+其他字符EndSelect一個(gè)一個(gè)case語句中允許有多個(gè)測試項(xiàng)，項(xiàng)與項(xiàng)之間用逗號(hào)分隔。語句中允許有多個(gè)測試項(xiàng)，項(xiàng)與項(xiàng)之間用逗號(hào)分隔。精選pptPrivate Sub Command1_Click() Dim x As Integer x = Val(Text1.Text) Select Case x Case Is 1 Text2.Text = 這是小于這是小于1的數(shù)的數(shù) Case 1 To 10 Text2.Text = 這是這是1到到10之間的數(shù)之間的數(shù) Case Else Text2.Text = 這是大于這是大于10的數(shù)的數(shù) End S

15、electEnd Sub閱讀程序，若用戶在文本框閱讀程序，若用戶在文本框1中輸入了中輸入了8，文本框，文本框2中顯示的結(jié)果是什么？中顯示的結(jié)果是什么？精選pptIF嵌套If .Then If Then else end ifEnd if完成例3的思考題。精選pptn可用來執(zhí)行簡單的條件判斷操作，它是n“If Then Else”結(jié)構(gòu)的簡寫版本。 結(jié)果=IIF(條件,True部分,False部分)注意，3個(gè)參數(shù)都不能省略。要求： True部分,False部分及結(jié)果變量的類型一致。Print IIf(Combo1.Text = 上午上午, 上午好上午好, 下午好下午好)精選ppt常見錯(cuò)誤常見錯(cuò)誤1 1在選擇結(jié)構(gòu)中缺少配對(duì)的結(jié)束語句在選擇結(jié)構(gòu)中缺少配對(duì)的結(jié)束語句對(duì)對(duì)多行式多行式的的IfIf塊語句中，應(yīng)有配對(duì)的塊語句中，應(yīng)有配對(duì)的