第章基本程序結(jié)構(gòu)ppt課件

1、第第4 4章章根本程序構(gòu)造根本程序構(gòu)造郭清溥河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥2第第4 4章根本程序構(gòu)造章根本程序構(gòu)造 編寫相應(yīng)各種事件的程序代碼，這是程序編寫相應(yīng)各種事件的程序代碼，這是程序設(shè)計(jì)的重點(diǎn)和難點(diǎn)。設(shè)計(jì)的重點(diǎn)和難點(diǎn)。 程序設(shè)計(jì)有三種根本構(gòu)造，它們是順序構(gòu)程序設(shè)計(jì)有三種根本構(gòu)造，它們是順序構(gòu)造、選擇構(gòu)造和循環(huán)構(gòu)造，這是程序設(shè)計(jì)的根造、選擇構(gòu)造和循環(huán)構(gòu)造，這是程序設(shè)計(jì)的根底，這些內(nèi)容將在本章中一一引見。同時(shí)還在底，這些內(nèi)容將在本章中一一引見。同時(shí)還在最后一節(jié)引見一些程序設(shè)計(jì)中的常用算法。最后一節(jié)引見一些程序設(shè)計(jì)中的常用算法?！颈菊聦?dǎo)讀】【本章導(dǎo)讀】河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥

2、3第第4 4章根本程序構(gòu)造章根本程序構(gòu)造 順序構(gòu)造順序構(gòu)造 選擇構(gòu)造選擇構(gòu)造 循環(huán)構(gòu)造循環(huán)構(gòu)造 幾種常用的算法引見幾種常用的算法引見【本章要點(diǎn)】【本章要點(diǎn)】8學(xué)時(shí)實(shí)際，學(xué)時(shí)實(shí)際，8學(xué)時(shí)上機(jī)學(xué)時(shí)上機(jī)課時(shí)安排課時(shí)安排河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥4 語句組1 語句組n 語句組24.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì) 順序構(gòu)造是一種線性構(gòu)造。是程序設(shè)計(jì)中最簡單同時(shí)也是最根本的構(gòu)造。它要求順序地執(zhí)行每一個(gè)根本的加工處置單位。語句組2語句組1開場終了語句組n河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥54.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì) 在計(jì)算機(jī)中讓一個(gè)沒有被賦予詳細(xì)值的變

3、量參與運(yùn)算是沒在計(jì)算機(jī)中讓一個(gè)沒有被賦予詳細(xì)值的變量參與運(yùn)算是沒有意義的。因此給變量提供初值是程序中不可短少的步驟。有意義的。因此給變量提供初值是程序中不可短少的步驟。 計(jì)算表達(dá)式的值，并將其提供應(yīng)變量計(jì)算表達(dá)式的值，并將其提供應(yīng)變量 或或 修正指定對象的屬性值。修正指定對象的屬性值。 Let = 或 Let . = 格式格式功能功能 4.1.1 賦值語句賦值語句河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥64.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì) 在計(jì)算機(jī)中讓一個(gè)沒有被賦予詳細(xì)值的變量參與運(yùn)算是沒在計(jì)算機(jī)中讓一個(gè)沒有被賦予詳細(xì)值的變量參與運(yùn)算是沒有意義的。因此給變量提供初值是程序中不可短

4、少的步驟。有意義的。因此給變量提供初值是程序中不可短少的步驟。 Let intMax = 0 Let intMax = 0 該語句將數(shù)值型數(shù)據(jù)該語句將數(shù)值型數(shù)據(jù)0 0保管在變量保管在變量intMaxintMax中。中。 Text1.Text = Text1.Text = 河南財(cái)經(jīng)學(xué)院河南財(cái)經(jīng)學(xué)院 該語句將稱號為該語句將稱號為Text1Text1的的TextBoxTextBox控件的控件的TextText屬屬性值修正為性值修正為“河南財(cái)經(jīng)學(xué)院。河南財(cái)經(jīng)學(xué)院。例如例如 4.1.1 賦值語句賦值語句河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥74.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)1. 1.

5、命令關(guān)鍵字命令關(guān)鍵字 Let Let 可以缺?。豢梢匀笔?；2. 2. 語句格式中的符號語句格式中的符號“= =是是 賦值號，賦值號， 與數(shù)學(xué)中的等號只是方式上一樣；與數(shù)學(xué)中的等號只是方式上一樣；3. 3. 一個(gè)賦值語句只能給一個(gè)變量賦值；一個(gè)賦值語句只能給一個(gè)變量賦值；4. 4. 賦值符號賦值符號“= =右邊的表達(dá)式可以是變量、常右邊的表達(dá)式可以是變量、常量、量、 函數(shù)等；函數(shù)等；5. 5. 賦值符號賦值符號“= =左邊只能是變量名或?qū)ο蟮膶僮筮呏荒苁亲兞棵驅(qū)ο蟮膶傩砸砸?用，不能是常量、符號常量、表達(dá)式；用，不能是常量、符號常量、表達(dá)式； 6. 6. 賦值號兩邊的數(shù)據(jù)類型普通應(yīng)該一致。賦

6、值號兩邊的數(shù)據(jù)類型普通應(yīng)該一致。闡明闡明 4.1.1 賦值語句賦值語句河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥84.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)X = 8 X = 8 ，Y = 9Y = 9N = N + 1N = N + 1M = X = 8M = X = 8Exp = Sqr(3)Exp = Sqr(3)5 = X + Y5 = X + YX + Y = 5X + Y = 5X = 8 : Y = 9X = 8 : Y = 9表示表示 N N 累加累加 1 1將將 X = 8 X = 8 的值邏輯量的值邏輯量賦給賦給 M MExp1 = Sqr(3)Exp1 = Sqr(3

7、)賦值號左邊不能是常量賦值號左邊不能是常量賦值號左邊不能是表達(dá)式賦值號左邊不能是表達(dá)式 4.1.1 賦值語句賦值語句河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥94.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換例例4.1我們用我們用 F F 表示華氏溫度表示華氏溫度 用用 C C 表示攝氏溫度表示攝氏溫度 那么它們的關(guān)系為：那么它們的關(guān)系為：C=5(F-32)/9 C=5(F-32)/9 ( (或：或：F=32+9C/5) F=32+9C/5) 4.1.1 賦值語句賦值語句分析：分析：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥104

8、.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換例例4.1 4.1.1 賦值語句賦值語句河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥114.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換例例4.1F To C從文本框中獲得F的值,即：F=Val(txtF.Text)用5*(F-32)/9計(jì)算C的值,即：C=5*(F-32)/9用文本框輸出C的值,即： txtC.Text = C開場終了 4.1.1 賦值語句賦值語句河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥124

9、.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換例例4.1C To F從文本框中獲得C的值,即： C=Val(txtC.Text)用9*C/5+32計(jì)算F的值,即：F=9*C/5+32用文本框輸出F的值,即： txtF.Text = F開場終了 4.1.1 賦值語句賦值語句河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥134.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換例例4.1F to C 命令按鈕命令按鈕Private Sub cmdFtoC_Clic

10、k()Private Sub cmdFtoC_Click() Dim F!, C! Dim F!, C! Let F = Val(txtF.Text) Let F = Val(txtF.Text) Let C = 5 Let C = 5 * * (F - 32) / 9 (F - 32) / 9 Let txtC.Text = C Let txtC.Text = CEnd Sub End Sub 4.1.1 賦值語句賦值語句河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥144.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換編寫程序，求攝氏溫度與華氏溫度的轉(zhuǎn)換例例4.

11、1C to F 命令按鈕命令按鈕Private Sub cmdCtoF_Click()Private Sub cmdCtoF_Click() Dim F!, C! Dim F!, C! C = Val(txtC.Text) C = Val(txtC.Text) F = 9 F = 9 * * C / 5 + 32 C / 5 + 32 txtF.Text = F txtF.Text = FEnd Sub End Sub 4.1.1 賦值語句賦值語句河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥154.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Print 格式格式在指定的窗體中顯示在指定的窗體中顯示

12、“輸出項(xiàng)表的值輸出項(xiàng)表的值缺省窗體時(shí)指當(dāng)前窗體缺省窗體時(shí)指當(dāng)前窗體功能功能 4.1.2 Print方法方法河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥164.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)數(shù)值型數(shù)據(jù)在輸出時(shí)都是第一位是符號數(shù)值型數(shù)據(jù)在輸出時(shí)都是第一位是符號位位, 數(shù)值最后要帶一個(gè)字符位的尾空數(shù)值最后要帶一個(gè)字符位的尾空 ； “Print方法最后假設(shè)沒有格式字符，方法最后假設(shè)沒有格式字符，那么執(zhí)那么執(zhí) 行完輸出后，自動(dòng)換行行完輸出后，自動(dòng)換行 ；最后假設(shè)有格；最后假設(shè)有格式式 字符，那么執(zhí)行完輸出內(nèi)容后按格式字字符，那么執(zhí)行完輸出內(nèi)容后按格式字符的符的 規(guī)定挪動(dòng)輸出指針規(guī)定挪動(dòng)輸出指針

13、闡明闡明 4.1.2 Print方法方法河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥174.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)格式字符格式字符“，所規(guī)定的輸出叫規(guī)范輸出。，所規(guī)定的輸出叫規(guī)范輸出。規(guī)范輸出是按每一部分占規(guī)范輸出是按每一部分占14個(gè)字符位計(jì)算。個(gè)字符位計(jì)算。 格式字符格式字符“，就是將輸出指針移到下一，就是將輸出指針移到下一個(gè)規(guī)范區(qū)域。個(gè)規(guī)范區(qū)域。格式字符格式字符 “， 4.1.2 Print方法方法河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥18Print 123456789012345, B, C, D, E, FPrint 123456789012345, B, C, D,

14、E, FPrint -1, 2,Print -1, 2,Print Microsoft Visual BASICPrint Microsoft Visual BASIC4.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)格式字符格式字符 “，舉例，舉例 4.1.2 Print方法方法河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥194.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì) 格式字符格式字符“；所規(guī)定的輸出叫緊湊輸出。；所規(guī)定的輸出叫緊湊輸出。緊湊輸出就是緊挨著輸出。緊湊輸出就是緊挨著輸出。 格式字符格式字符“；就是堅(jiān)持輸出指針不動(dòng)。；就是堅(jiān)持輸出指針不動(dòng)。 格式字符格式字符 “； 4.1.2

15、 Print方法方法河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥20Print 123456789012345; B; C; D; E; FPrint 123456789012345; B; C; D; E; FPrint -1; 2;Print -1; 2;Print Microsoft Visual BASICPrint Microsoft Visual BASIC4.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)格式字符格式字符 “；舉例；舉例 4.1.2 Print方法方法河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥214.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Tab(n): Tab(n)

16、: 將輸出指針移到第將輸出指針移到第n n個(gè)位置。個(gè)位置。 當(dāng)當(dāng) n n 輸出指針的當(dāng)前值輸出指針的當(dāng)前值 時(shí)時(shí), , 輸出移到下一行執(zhí)行。輸出移到下一行執(zhí)行。Spc(n): Spc(n): 輸出輸出n n個(gè)空格。個(gè)空格。 與與Print方法有關(guān)的函數(shù)方法有關(guān)的函數(shù) 4.1.2 Print方法方法河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥22Print 1234567890;Print 1234567890;Print Tab(12); ABCDEPrint Tab(12); ABCDEPrint Spc(10); ABCDE;Print Spc(10); ABCDE;Print Tab(12);

17、ABCDEPrint Tab(12); ABCDE4.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)與與Print方法有關(guān)的函數(shù)舉例方法有關(guān)的函數(shù)舉例 4.1.2 Print方法方法河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥234.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì) 該函數(shù)的作用是在一個(gè)對話框中顯示提示，等待該函數(shù)的作用是在一個(gè)對話框中顯示提示，等待用戶輸入正文或按下按鈕，并前往包含文本框中內(nèi)用戶輸入正文或按下按鈕，并前往包含文本框中內(nèi)容。容。 函數(shù)前往值的類型為字符型。函數(shù)前往值的類型為字符型。 輸入對話框輸入對話框InputBoxInputBox函數(shù)函數(shù)InputBox(,)格式

18、格式 4.1.3 人機(jī)交互人機(jī)交互河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥244.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Dim strIDCard$ Dim strIDCard$ strIDCard = InputBox(strIDCard = InputBox(輸入完成后單擊輸入完成后單擊“確定按鈕確定按鈕 ， 輸入卡號輸入卡號) )輸入對話框輸入對話框InputBoxInputBox函數(shù)函數(shù) 4.1.3 人機(jī)交互人機(jī)交互河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥254.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Dim strName$strName = InputBox(輸入他的姓名

19、輸入他的姓名 & Chr(13) & Chr(10) & _ 完成后單擊完成后單擊“確定按鈕確定按鈕, 輸入輸入, 郭清溥郭清溥 )輸入對話框輸入對話框InputBoxInputBox函數(shù)函數(shù)提示標(biāo)題默許產(chǎn)生一個(gè)回車換行 4.1.3 人機(jī)交互人機(jī)交互河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥264.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì) MsgBox函數(shù)在對話框中顯示信息，等待用戶單擊函數(shù)在對話框中顯示信息，等待用戶單擊按鈕，并前往一個(gè)整數(shù)以闡明用戶單擊了哪個(gè)按鈕。按鈕，并前往一個(gè)整數(shù)以闡明用戶單擊了哪個(gè)按鈕。音訊對話框音訊對話框MsgBoxMsgBox函數(shù)函數(shù)Ms

20、gBox ( , ) 格式格式 4.1.3 人機(jī)交互人機(jī)交互河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥274.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)音訊對話框音訊對話框MsgBoxMsgBox函數(shù)函數(shù)( (按鈕值按鈕值) )的意義的意義 4.1.3 人機(jī)交互人機(jī)交互河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥284.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)音訊對話框音訊對話框MsgBoxMsgBox函數(shù)函數(shù)對話框中的圖標(biāo) 4.1.3 人機(jī)交互人機(jī)交互河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥294.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)音訊對話框音訊對話框MsgBoxMsgBox函數(shù)函

21、數(shù)默許按鈕的設(shè)置 4.1.3 人機(jī)交互人機(jī)交互河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥304.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)音訊對話框音訊對話框MsgBoxMsgBox函數(shù)函數(shù)vbOKCancel + vbInformation + vbDefaultButton1vbOKCancel + vbInformation + vbDefaultButton1 YN = MsgBox( YN = MsgBox(請確認(rèn)他的輸入！請確認(rèn)他的輸入！, 1 + 64 + 0 , , 1 + 64 + 0 , 確認(rèn)確認(rèn))“1表示顯示表示顯示“確確定、定、“取消按取消按鈕鈕 “0表示第一個(gè)表示第一

22、個(gè)按鈕是默許值按鈕是默許值 “64表示顯表示顯示圖標(biāo)示圖標(biāo) 4.1.3 人機(jī)交互人機(jī)交互YN = MsgBox(YN = MsgBox(他的輸入有誤！他的輸入有誤！, 5 + 16 + 256, , 5 + 16 + 256, 確認(rèn)確認(rèn)) ) 651 + 64 + 0河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥314.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)音訊對話框音訊對話框MsgBoxMsgBox函數(shù)函數(shù) 4.1.3 人機(jī)交互人機(jī)交互MsgBox函數(shù)的前往值河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥324.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)MsgBox還可以寫成語句的格式。還可以寫

23、成語句的格式。 音訊對話框音訊對話框MsgBoxMsgBox語句語句MsgBox , 當(dāng)當(dāng)MsgBox為語句時(shí)，沒有前往值。為語句時(shí)，沒有前往值。格式格式語句要求的參數(shù)不運(yùn)用括號！MsgBox MsgBox 文件已保管！文件已保管！, 0 + 48 + 0, , 0 + 48 + 0, 確認(rèn)確認(rèn) 4.1.3 人機(jī)交互人機(jī)交互河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥334.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Visual BasicVisual Basic期終成果由三部分組成：期終考試、作業(yè)和平期終成果由三部分組成：期終考試、作業(yè)和平常成果，它們分別占常成果，它們分別占7070，1010

24、，2020?，F(xiàn)有一個(gè)學(xué)生的。現(xiàn)有一個(gè)學(xué)生的成果依次為成果依次為 89 89，9090，7878，編寫程序，求其總評成果。，編寫程序，求其總評成果。 假設(shè)程序中我們分別用假設(shè)程序中我們分別用KS，ZY，CS表示考表示考試成果、作業(yè)成果和平常測試成果，那么總評試成果、作業(yè)成果和平常測試成果，那么總評成果成果ZP為：為： ZP = KS70+ ZY10+ CS20例例4.4分析：分析：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥344.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)按鈕稱號 ：cmdJS按鈕稱號 ：cmdGB用InputBox輸入，顯示在文本框中。Visual BasicVisual Ba

25、sic期終成果由三部分組成：期終考試、作業(yè)和平期終成果由三部分組成：期終考試、作業(yè)和平常成果，它們分別占常成果，它們分別占7070，1010，2020?，F(xiàn)有一個(gè)學(xué)生的。現(xiàn)有一個(gè)學(xué)生的成果依次為成果依次為 8989，9090，7878，編寫程序，求其總評成果。，編寫程序，求其總評成果。 例例4.4河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥354.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Visual BasicVisual Basic期終成果由三部分組成：期終考試、作業(yè)和平期終成果由三部分組成：期終考試、作業(yè)和平常成果，它們分別占常成果，它們分別占7070，1010，2020?，F(xiàn)有一個(gè)學(xué)生的。現(xiàn)

26、有一個(gè)學(xué)生的成果依次為成果依次為 8989，9090，7878，編寫程序，求其總評成果。，編寫程序，求其總評成果。 例例4.4河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥364.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Visual BasicVisual Basic期終成果由三部分組成：期終考試、作業(yè)和平期終成果由三部分組成：期終考試、作業(yè)和平常成果，它們分別占常成果，它們分別占7070，1010，2020?，F(xiàn)有一個(gè)學(xué)生的。現(xiàn)有一個(gè)學(xué)生的成果依次為成果依次為 8989，9090，7878，編寫程序，求其總評成果。，編寫程序，求其總評成果。 例例4.4河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥374.

27、1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)“計(jì)算命令按鈕計(jì)算命令按鈕cmdJScmdJS的程序源代碼如下：的程序源代碼如下：Private Sub cmdJS_Click()Private Sub cmdJS_Click() Dim Temp$, KS%, ZY%, CS%, ZP! Dim Temp$, KS%, ZY%, CS%, ZP! Temp = InputBox(, Temp = InputBox(, 輸入輸入“考試成果考試成果) ) KS = Val(Temp): txtKS.Text = KS KS = Val(Temp): txtKS.Text = KS Temp =

28、InputBox(, Temp = InputBox(, 輸入輸入“作業(yè)成果作業(yè)成果) ) ZY = Val(Temp): txtZY.Text = ZY ZY = Val(Temp): txtZY.Text = ZY Temp = InputBox(, Temp = InputBox(, 輸入輸入“測試成果測試成果) ) CS = Val(Temp): txtCS.Text = CS CS = Val(Temp): txtCS.Text = CS ZP = KS ZP = KS * * 0.7 + ZY 0.7 + ZY * * 0.1 + CS 0.1 + CS * * 0.2 0.2 l

29、blZP.Caption = lblZP.Caption = 總評成果：總評成果： & Str(ZP) & Str(ZP)End SubEnd SubKS KS * * 70 70 + ZY + ZY * * 10 10 + CS + CS * * 20 20 例例4.4KS = txtKS.Text ZY = txtZY.Text CS = txtCS.Text 在調(diào)整文本框的在調(diào)整文本框的Enabled屬性后可以用文本框輸屬性后可以用文本框輸入三個(gè)成果。入三個(gè)成果。河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥384.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì) 雞兔同籠問題：雞

30、和兔子被放在同一個(gè)籠中，如今知雞雞兔同籠問題：雞和兔子被放在同一個(gè)籠中，如今知雞兔的總頭數(shù)和總腳數(shù)。編寫程序，求籠中雞和兔子各多少兔的總頭數(shù)和總腳數(shù)。編寫程序，求籠中雞和兔子各多少只只? ? 我們用我們用 H H 表示總頭數(shù)，表示總頭數(shù)，F(xiàn) F 表示總腳數(shù)表示總腳數(shù) 用用 C C 表示雞，表示雞，R R 表示兔子表示兔子 那么有那么有: : C + R = H C + R = H 2C + 4R = F 2C + 4R = F R =R =F- 2HF- 2H/ 2 / 2 C = H R C = H R 例例4.5分析：分析：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥394.1 4.1 順序構(gòu)造的

31、程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)文本框稱號文本框稱號 ：txtR文本框稱號文本框稱號 ：txtC按鈕稱號按鈕稱號 ：cmdStart用用InputBox輸輸入入H,F。用標(biāo)。用標(biāo)簽顯示。簽顯示。 雞兔同籠問題：雞和兔子被放在同一個(gè)籠中，如今知雞雞兔同籠問題：雞和兔子被放在同一個(gè)籠中，如今知雞兔的總頭數(shù)和總腳數(shù)。編寫程序，求籠中雞和兔子各多少兔的總頭數(shù)和總腳數(shù)。編寫程序，求籠中雞和兔子各多少只只? ? 例例4.5河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥404.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì) 雞兔同籠問題：雞和兔子被放在同一個(gè)籠中，如今知雞雞兔同籠問題：雞和兔子被放在同一個(gè)籠中，如今知雞兔

32、的總頭數(shù)和總腳數(shù)。編寫程序，求籠中雞和兔子各多少兔的總頭數(shù)和總腳數(shù)。編寫程序，求籠中雞和兔子各多少只只? ? 例例4.5河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥414.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì) 雞兔同籠問題：雞和兔子被放在同一個(gè)籠中，如今知雞雞兔同籠問題：雞和兔子被放在同一個(gè)籠中，如今知雞兔的總頭數(shù)和總腳數(shù)。編寫程序，求籠中雞和兔子各多少兔的總頭數(shù)和總腳數(shù)。編寫程序，求籠中雞和兔子各多少只只? ? 例例4.5“計(jì)算命令按鈕計(jì)算命令按鈕cmdStart的程序源代碼如下：的程序源代碼如下： Private Sub cmdStart_Click() Dim H%, F%, R%,

33、 C% H = Val(InputBox(, 輸入總頭數(shù)輸入總頭數(shù)) F = Val(InputBox(, 輸入總腳數(shù)輸入總腳數(shù)) lblResult.Caption = 總頭數(shù)總頭數(shù): & H & 總腳數(shù)：總腳數(shù)： & F R = (F - 2 * H) / 2 : C = H - R txtC.Text = C : txtR.Text = REnd Sub河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥424.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)A A、B B、C C三人上街買糖果。三人買好后，三人上街買糖果。三人買好后，A A對對B B、C C說：說：“我可以按我

34、可以按他們現(xiàn)有的數(shù)量再送他們每人一份。之后，他們現(xiàn)有的數(shù)量再送他們每人一份。之后，B B對對A A、C C ；C C對對A A、B B也說了同樣的話。相互贈送后，每人各有也說了同樣的話。相互贈送后，每人各有6464塊糖果。編寫程序，塊糖果。編寫程序，計(jì)算計(jì)算A A、B B、C C原來各買了多少塊糖果？原來各買了多少塊糖果？ 我們用我們用A A、B B、C C表示三人原來各買的糖果數(shù)。表示三人原來各買的糖果數(shù)。 C C 送給送給A A、B B前前 AA/2 AA/2 BB/2 BB/2 CA+B+C CA+B+C B B 送給送給A A、C C前前 AA/2 AA/2 CC/2 CC/2 BA+

35、B+C BA+B+C A A 送給送給B B、C C前前 BB/2 BB/2 CC/2 CC/2 AA+B+C AA+B+C 例例4.7分析：分析：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥434.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)A A、B B、C C三人上街買糖果。三人買好后，三人上街買糖果。三人買好后，A A對對B B、C C說：說：“我可以按我可以按他們現(xiàn)有的數(shù)量再送他們每人一份。之后，他們現(xiàn)有的數(shù)量再送他們每人一份。之后，B B對對A A、C C ；C C對對A A、B B也說了同樣的話。相互贈送后，每人各有也說了同樣的話。相互贈送后，每人各有6464塊糖果。編寫程序，塊糖果

36、。編寫程序，計(jì)算計(jì)算A A、B B、C C原來各買了多少塊糖果？原來各買了多少塊糖果？ 例例4.7河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥444.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)A A、B B、C C三人上街買糖果。三人買好后，三人上街買糖果。三人買好后，A A對對B B、C C說：說：“我可以按我可以按他們現(xiàn)有的數(shù)量再送他們每人一份。之后，他們現(xiàn)有的數(shù)量再送他們每人一份。之后，B B對對A A、C C ；C C對對A A、B B也說了同樣的話。相互贈送后，每人各有也說了同樣的話。相互贈送后，每人各有6464塊糖果。編寫程序，塊糖果。編寫程序，計(jì)算計(jì)算A A、B B、C C原來各買

37、了多少塊糖果？原來各買了多少塊糖果？ 例例4.7河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥454.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Private Sub cmdStart_Click()Private Sub cmdStart_Click() Dim A%, B%, C% Dim A%, B%, C% A = 64: B = 64: C = 64 A = 64: B = 64: C = 64 A = A / 2: B = B / 2: C = A + B + C A = A / 2: B = B / 2: C = A + B + C C = C / 2: A = A / 2: B =

38、 A + B + C C = C / 2: A = A / 2: B = A + B + C B = B / 2: C = C / 2: A = A + B + C B = B / 2: C = C / 2: A = A + B + C lblResult.Caption = A lblResult.Caption = A、B B、C C三人的糖果數(shù)為：三人的糖果數(shù)為：_ _ & & A & & B & & C & & A & & B & & CEnd SubEnd SubA A、B B、C C三人

39、上街買糖果。三人買好后，三人上街買糖果。三人買好后，A A對對B B、C C說：說：“我可以按我可以按他們現(xiàn)有的數(shù)量再送他們每人一份。之后，他們現(xiàn)有的數(shù)量再送他們每人一份。之后，B B對對A A、C C ；C C對對A A、B B也說了同樣的話。相互贈送后，每人各有也說了同樣的話。相互贈送后，每人各有6464塊糖果。編寫程序，塊糖果。編寫程序，計(jì)算計(jì)算A A、B B、C C原來各買了多少塊糖果？原來各買了多少塊糖果？ 例例4.7河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥464.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)4.1.4 With語句語句 格式：格式：With .End With 功能

40、：功能： With語句可以對某個(gè)對象執(zhí)行一系列的操作，而不用反語句可以對某個(gè)對象執(zhí)行一系列的操作，而不用反復(fù)指出對象的稱號。復(fù)指出對象的稱號。 河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥474.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，在實(shí)數(shù)范圍內(nèi)求解一元二次方程：編寫程序，在實(shí)數(shù)范圍內(nèi)求解一元二次方程：aX2+bX+c=0由于要求在實(shí)數(shù)范圍內(nèi)求解一元二次方程，由于要求在實(shí)數(shù)范圍內(nèi)求解一元二次方程，所以我們應(yīng)該假設(shè)該方程的根的判別式所以我們應(yīng)該假設(shè)該方程的根的判別式 d2-4ac0，因此我們可以利用一元二次方，因此我們可以利用一元二次方程的求根公式來求解方程。程的求根公式來求解方程。

41、aacbbx2422, 1例例4.6分析：分析：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥484.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)例例4.6編寫程序，在實(shí)數(shù)范圍內(nèi)求解一元二次方程：編寫程序，在實(shí)數(shù)范圍內(nèi)求解一元二次方程：aX2+bX+c=0由由InputBox輸入方程的輸入方程的系數(shù)系數(shù)河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥494.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)例例4.6編寫程序，在實(shí)數(shù)范圍內(nèi)求解一元二次方程：編寫程序，在實(shí)數(shù)范圍內(nèi)求解一元二次方程：aX2+bX+c=0河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥50編寫程序，在實(shí)數(shù)范圍內(nèi)求解一元二次方程：編寫程序，在實(shí)數(shù)范圍

42、內(nèi)求解一元二次方程：aX2+bX+c=04.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Private Sub cmdStart_Click()Private Sub cmdStart_Click() Dim A%, B%, C%, X1!, X2! Dim A%, B%, C%, X1!, X2! A = Val(InputBox(, A = Val(InputBox(, 輸入方程的系數(shù)輸入方程的系數(shù)A)A) B = Val(InputBox(, B = Val(InputBox(, 輸入方程的系數(shù)輸入方程的系數(shù)B)B) C = Val(InputBox(, C = Val(InputB

43、ox(, 輸入方程的系數(shù)輸入方程的系數(shù)C)C) lblShow.Caption = lblShow.Caption = 一元二次方程的系數(shù)是：一元二次方程的系數(shù)是： & A & , & B & , & A & , & B & , & C& C X1 = (-B + Sqr(B X1 = (-B + Sqr(B * * B - 4 B - 4 * * A A * * C) / (2 C) / (2 * * A) A) X2 = (-B - Sqr(B X2 = (-B - Sqr(B * * B - 4 B - 4

44、* * A A * * C) / (2 C) / (2 * * A) A) lblX1.Caption = X1= & X1 lblX1.Caption = X1= & X1 lblX2.Caption = X2= & X2 lblX2.Caption = X2= & X2End SubEnd Sub例例4.6河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥514.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，分別顯示角度和弧度的正弦值。編寫程序，分別顯示角度和弧度的正弦值。程序運(yùn)轉(zhuǎn)后程序運(yùn)轉(zhuǎn)后顯示顯示“例例B1 計(jì)算正弦計(jì)算正弦計(jì)算角度計(jì)算角度的正弦值的正弦值

45、計(jì)算弧度計(jì)算弧度的正弦值的正弦值輸入原始輸入原始數(shù)據(jù)數(shù)據(jù)X輸出計(jì)算輸出計(jì)算結(jié)果結(jié)果Y補(bǔ)充例題補(bǔ)充例題1 1河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥524.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，分別顯示角度和弧度的正弦值。編寫程序，分別顯示角度和弧度的正弦值。補(bǔ)充例題補(bǔ)充例題1 1河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥53程序運(yùn)轉(zhuǎn)后，窗體中各個(gè)控件的標(biāo)題要明確顯示：程序運(yùn)轉(zhuǎn)后，窗體中各個(gè)控件的標(biāo)題要明確顯示： Private Sub Form_Load() Form1.Caption = 例例B1 計(jì)算正弦計(jì)算正弦 cmdJD.Caption = 按角度計(jì)算按角度計(jì)算 cmdHD.

46、Caption = 按弧度計(jì)算按弧度計(jì)算 txtSR.Text = lblSC.Caption = End Sub4.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)編寫程序，分別顯示角度和弧度的正弦值。編寫程序，分別顯示角度和弧度的正弦值。補(bǔ)充例題補(bǔ)充例題1 1河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥544.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Private Sub cmdJD_Click()Private Sub cmdJD_Click() Dim X!, Y! Dim X!, Y! X = Val(txtSR.Text) X = Val(txtSR.Text) Y = Sin(X

47、 Y = Sin(X * * 3.14 / 180) 3.14 / 180) lblSC.Caption = Sin( & X & lblSC.Caption = Sin( & X & 度度)= & Y)= & YEnd SubEnd Sub編寫程序，分別顯示角度和弧度的正弦值。編寫程序，分別顯示角度和弧度的正弦值。補(bǔ)充例題補(bǔ)充例題1 1河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥554.1 4.1 順序構(gòu)造的程序設(shè)計(jì)順序構(gòu)造的程序設(shè)計(jì)Private Sub cmdHD_Click()Private Sub cmdHD_Click() Dim X!, Y

48、! Dim X!, Y! X = Val(txtSR.Text) X = Val(txtSR.Text) Y = Sin(X) Y = Sin(X) lblSC.Caption =Sin( & X & lblSC.Caption =Sin( & X & 弧度弧度)= & Y)= & YEnd SubEnd Sub編寫程序，分別顯示角度和弧度的正弦值。編寫程序，分別顯示角度和弧度的正弦值。補(bǔ)充例題補(bǔ)充例題1 1河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥56第第4 4章章 實(shí)驗(yàn)實(shí)驗(yàn)1 11. 例例4.4提交執(zhí)行文件請讀者思索：假設(shè)將提交執(zhí)行文件請讀者思索：

49、假設(shè)將程序中給程序中給ZP 賦值的語賦值的語 句做如下修正后再運(yùn)轉(zhuǎn)程序，會有什么結(jié)果句做如下修正后再運(yùn)轉(zhuǎn)程序，會有什么結(jié)果 輸出，為什么輸出，為什么? ZP = KS * 70 + ZY * 10 + CS * 202. 例例4.6提交執(zhí)行文件提交執(zhí)行文件3. 習(xí)題四，第二題編程題，第習(xí)題四，第二題編程題，第2題題 將源代碼直接粘貼到答題框中將源代碼直接粘貼到答題框中河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥574.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì) 選擇構(gòu)造，是一種常用的主選擇構(gòu)造，是一種常用的主要根本構(gòu)造，是計(jì)算機(jī)科學(xué)用要根本構(gòu)造，是計(jì)算機(jī)科學(xué)用來描畫分支景象的重要手段。來描畫分支

50、景象的重要手段。其特點(diǎn)是：根據(jù)所給定選擇條其特點(diǎn)是：根據(jù)所給定選擇條件為真件為真(即分支條件成立即分支條件成立)與否，與否，而決議從各實(shí)踐能夠的不同操而決議從各實(shí)踐能夠的不同操作分支中執(zhí)行某一分支的相應(yīng)作分支中執(zhí)行某一分支的相應(yīng)操作。并且任何情況下恒有操作。并且任何情況下恒有“無論分支多寡無論分支多寡,必?fù)衿湟?；縱必?fù)衿湟?；縱然分支眾多然分支眾多,僅選其一的特性。僅選其一的特性。河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥58當(dāng)條件為真當(dāng)條件為真時(shí)，執(zhí)行語時(shí)，執(zhí)行語句組句組1；當(dāng)；當(dāng)條件為假時(shí)，條件為假時(shí)，順序向下執(zhí)順序向下執(zhí)行。行。 4.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì) 塊方式： I

51、f Then End If行方式： If Then 功能功能單分支構(gòu)造格式單分支構(gòu)造格式 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥594.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì)單分支構(gòu)造流程圖單分支構(gòu)造流程圖語句組1條件True False條件語句組1TrueFalse 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥604.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì)比較時(shí)會涉及到交換。比較時(shí)會涉及到交換。Y5TX3Y = 5X = 3T = 535交換間接交換間接交

52、換間接交換：間接交換： T = Y : Y = X : X = T 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)兩個(gè)數(shù)據(jù)兩個(gè)數(shù)據(jù)X，Y比較大小，使得比較大小，使得X大于大于Y。例如：例如：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥614.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì)塊方式塊方式: :If X Y ThenIf X Y Then T = Y : Y = X : X = T T = Y : Y = X : X = TEndIfEndIf用下面的語句可以實(shí)現(xiàn)用下面的語句可以實(shí)現(xiàn)行方式行方式: :If X Y Then T = Y : Y = X : X = TIf

53、X Y Then T = Y : Y = X : X = T兩個(gè)數(shù)據(jù)兩個(gè)數(shù)據(jù)X，Y比較大小。使得比較大小。使得X大于大于Y。 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)例如：例如：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥624.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì)塊方式：塊方式： If If Then Then 1 Else Else 2 End If End If行方式：行方式： If If Then Then Else Else 2當(dāng)條件為真時(shí)，當(dāng)條件為真時(shí)，執(zhí)行語句組執(zhí)行語句組1；當(dāng)條件為假時(shí)，當(dāng)條件為假時(shí)，執(zhí)行語句組執(zhí)行語句組2 。 功能功能雙分支構(gòu)造格式

54、雙分支構(gòu)造格式 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥634.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì)雙分支構(gòu)造流程圖雙分支構(gòu)造流程圖語句組2語句組1條件True False條件語句組1語句組2TrueFalse 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥64 x0y = 1 x=0 xxx1sin24.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì)這個(gè)問題可有多種方法實(shí)現(xiàn)這個(gè)問題可有多種方法實(shí)現(xiàn): 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)例

55、如：例如：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥65 x0y = 1 x=0 xxx1sin24.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì)If x 0 ThenIf x 0 Then y = Sin(x) + Sqr(x y = Sin(x) + Sqr(x * * x + 1) / x) x + 1) / x)ElseElse y = 1 y = 1End IfEnd If雙分支構(gòu)造雙分支構(gòu)造: : 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)例如：例如：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥664.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì)If x 0 The

56、n y = Sin(x)+ Sqr(x If x 0 Then y = Sin(x)+ Sqr(x * * x + 1)/x) x + 1)/x)If x = 0 Then y = 1If x = 0 Then y = 1單分支構(gòu)造方法單分支構(gòu)造方法1: 1: x0y = 1 x=0 xxx1sin2 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)例如：例如：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥67 x0y = 1 x=0 xxx1sin24.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì)y = 1y = 1If x 0 Then y = Sin(x)+ Sqr(x If

57、x 0 Then y = Sin(x)+ Sqr(x * * x + 1)/x) x + 1)/x)單分支構(gòu)造方法單分支構(gòu)造方法2:2:If x = 0 Then y = 1 If x = 0 Then y = 1 y = Sin(x)+ Sqr(x y = Sin(x)+ Sqr(x * * x + 1)/x) x + 1)/x)請思索:這樣修正程序行嗎？為什么？ 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)例如：例如：y = Sin(x)+ Sqr(x y = Sin(x)+ Sqr(x * * x + 1)/x) x + 1)/x)If x = 0 Then y =

58、1 If x = 0 Then y = 1 河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥68從甲地到乙地托運(yùn)轉(zhuǎn)李。行李分量在從甲地到乙地托運(yùn)轉(zhuǎn)李。行李分量在50千克以內(nèi)時(shí)，每千千克以內(nèi)時(shí)，每千克克0.80元；超越元；超越50千克時(shí)，其超越部分每千克千克時(shí)，其超越部分每千克1.10元。編寫元。編寫程序，計(jì)算托運(yùn)轉(zhuǎn)李千克時(shí)所付的運(yùn)費(fèi)。程序，計(jì)算托運(yùn)轉(zhuǎn)李千克時(shí)所付的運(yùn)費(fèi)。我們用我們用W表示行李的分量，表示行李的分量，F(xiàn)表示運(yùn)費(fèi)，依題意，表示運(yùn)費(fèi)，依題意，我們可以得到以下計(jì)算公式：我們可以得到以下計(jì)算公式： 0.8W (W 50 ) F= 500.8(W-50)1.1 (W 50) 4.2 4.2 選擇構(gòu)造的

59、程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì) 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)例例4.94.9分析：分析：河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥69從甲地到乙地托運(yùn)轉(zhuǎn)李。行李分量在從甲地到乙地托運(yùn)轉(zhuǎn)李。行李分量在50千克以內(nèi)時(shí)，每千千克以內(nèi)時(shí)，每千克克0.80元；超越元；超越50千克時(shí)，其超越部分每千克千克時(shí)，其超越部分每千克1.10元。編寫元。編寫程序，計(jì)算托運(yùn)轉(zhuǎn)李千克時(shí)所付的運(yùn)費(fèi)。程序，計(jì)算托運(yùn)轉(zhuǎn)李千克時(shí)所付的運(yùn)費(fèi)。4.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì) 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)例例4.94.9由由InputBox輸入輸入行

60、李的分量，行李的分量，河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥70從甲地到乙地托運(yùn)轉(zhuǎn)李。行李分量在從甲地到乙地托運(yùn)轉(zhuǎn)李。行李分量在50千克以內(nèi)時(shí)，每千千克以內(nèi)時(shí)，每千克克0.80元；超越元；超越50千克時(shí)，其超越部分每千克千克時(shí)，其超越部分每千克1.10元。編寫元。編寫程序，計(jì)算托運(yùn)轉(zhuǎn)李千克時(shí)所付的運(yùn)費(fèi)。程序，計(jì)算托運(yùn)轉(zhuǎn)李千克時(shí)所付的運(yùn)費(fèi)。4.2 4.2 選擇構(gòu)造的程序設(shè)計(jì)選擇構(gòu)造的程序設(shè)計(jì) 4.2.1 簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)簡單條件選擇構(gòu)造的程序?qū)崿F(xiàn)例例4.94.9河南財(cái)經(jīng)學(xué)院現(xiàn)代教育技術(shù)中心 郭清溥71Private Sub cmdStart_Click()Private Sub cmdStart_Click() Dim W!, F! Dim W!, F! W = Val(InputBox(, W = Val(InputBox(, 輸入行李的分量輸入行李的分量) lblW.Caption = lblW.Caption = 行李重行李重: & W & : & W & 千克千克 If W = 50 Then If W 0) Y= 0 (X=0)