VF程序設(shè)計與數(shù)據(jù)庫應(yīng)用教案-3

1、第第 1 1 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.4 模塊化設(shè)計模塊化設(shè)計結(jié)構(gòu)化程序設(shè)計原則：結(jié)構(gòu)化程序設(shè)計原則：自頂向下、逐步細化自頂向下、逐步細化/求精求精1、子程序子程序基本概念：基本概念：主程序主程序：主控模塊，調(diào)用子程序。：主控模塊，調(diào)用子程序。子程序子程序：功能模塊，被調(diào)用。：功能模塊，被調(diào)用。子程序的使用：子程序的使用：主程序：主程序：do 子程序名子程序名子程序：通過子程序：通過return返回返回第第 2 2 頁頁Computer Educatio

2、n department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.4 模塊化設(shè)計模塊化設(shè)計1、子程序、子程序主程序與子程序調(diào)用關(guān)系圖：主程序與子程序調(diào)用關(guān)系圖：Set talk offSet talk off. . . . . DO SUB1DO SUB1. . . . . . .Set talk onSet talk on 主程序主程序MAIN.PRGMAIN.PRG. . . .DO SUB2DO SUB2. . . . . RETURNRETURN 子程序子程序SUB1.PRGSUB1.PRG子程序子程序SUB2.PRGSUB

3、2.PRG. . . . . . . . . . ReturnReturn注意注意: Retrun to master情況情況第第 3 3 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.4 模塊化設(shè)計模塊化設(shè)計1、子程序、子程序應(yīng)用舉例：應(yīng)用舉例：例例1：分別計算：分別計算100以內(nèi)，以內(nèi)，200以內(nèi)，以內(nèi)，300以內(nèi)的奇數(shù)之和。以內(nèi)的奇數(shù)之和。主程序：主程序：main.prg & 控制模塊控制模塊子程序：子程序：sub.prg & 功能模塊功能模塊set t

4、alk offclearx=100do subx=200do subx=300do subset talk on s=0for j=1 to x step 2 s=s+jnext?x,”以內(nèi)的奇數(shù)和為：以內(nèi)的奇數(shù)和為：”,sreturn主程序主程序子程序子程序第第 4 4 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.4 模塊化設(shè)計模塊化設(shè)計2、過程、過程(1)過程文件概念：過程文件概念：子程序的獨立存在。子程序的獨立存在。將多個子程序合并起來存放在一個公用的程序文件中，該文

5、件為將多個子程序合并起來存放在一個公用的程序文件中，該文件為過程文件。過程文件。 (2)過程文件構(gòu)成：過程文件構(gòu)成：procedure 子程序子程序1文件名文件名 程序程序return procedure 子程序子程序2文件名文件名 程序程序return第第 5 5 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.4 模塊化設(shè)計模塊化設(shè)計2、過程、過程(3)過程的調(diào)用和關(guān)閉：過程的調(diào)用和關(guān)閉：調(diào)用：調(diào)用：set procedure to 過程文件名過程文件名關(guān)閉：關(guān)閉：set

6、procedure to或或close procedure (4)過程的應(yīng)用方式：過程的應(yīng)用方式：方式一：主程序方式一：主程序+過程文件為兩個獨立的程序文件過程文件為兩個獨立的程序文件方式二：主程序方式二：主程序+過程文件在同一程序文件中過程文件在同一程序文件中應(yīng)用舉例：應(yīng)用舉例：1、采用過程方式，編程實現(xiàn)用、采用過程方式，編程實現(xiàn)用“*”繪制平行四邊形、梯繪制平行四邊形、梯形、直角三角形和等腰三角形。形、直角三角形和等腰三角形。第第 6 6 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化

7、程序設(shè)計v3.4 模塊化設(shè)計模塊化設(shè)計2、過程、過程(3)過程的調(diào)用和關(guān)閉：過程的調(diào)用和關(guān)閉：調(diào)用：調(diào)用：set procedure to 過程文件名過程文件名關(guān)閉：關(guān)閉：set procedure to或或close procedure (4)過程的應(yīng)用方式：過程的應(yīng)用方式：方式一：主程序方式一：主程序+過程文件為兩個獨立的程序文件過程文件為兩個獨立的程序文件方式二：主程序方式二：主程序+過程文件在同一程序文件中過程文件在同一程序文件中應(yīng)用舉例：應(yīng)用舉例：1、采用過程方式，編程實現(xiàn)用、采用過程方式，編程實現(xiàn)用“*”繪制平行四邊形、梯繪制平行四邊形、梯形、直角三角形和等腰三角形。形、直角三角形

8、和等腰三角形。第第 7 7 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.4 模塊化設(shè)計模塊化設(shè)計3、自定義函數(shù)、自定義函數(shù)函數(shù)的分類函數(shù)的分類系統(tǒng)函數(shù)系統(tǒng)函數(shù)自定義函數(shù)自定義函數(shù)自定義函數(shù)的概念：自定義函數(shù)的概念：是指在程序設(shè)計中需要某項功能，而系統(tǒng)函數(shù)又無法滿足需是指在程序設(shè)計中需要某項功能，而系統(tǒng)函數(shù)又無法滿足需要，則用戶可以自己創(chuàng)建函數(shù)，這些函數(shù)，稱為用戶要，則用戶可以自己創(chuàng)建函數(shù)，這些函數(shù)，稱為用戶自定義自定義函數(shù)函數(shù) 。自定義函數(shù)的分類：自定義函數(shù)的分類：內(nèi)部自定

9、義函數(shù)內(nèi)部自定義函數(shù)獨立自定義函數(shù)獨立自定義函數(shù)第第 8 8 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.4 模塊化設(shè)計模塊化設(shè)計3、自定義函數(shù)、自定義函數(shù)應(yīng)用舉例：應(yīng)用舉例：1、自定義一個攝氏溫度轉(zhuǎn)換為華氏溫度的函數(shù)：、自定義一個攝氏溫度轉(zhuǎn)換為華氏溫度的函數(shù)：ctf()。方式一：方式一：內(nèi)部內(nèi)部自定義函數(shù)自定義函數(shù):ctf()程序如下：程序如下： test1.prgclearInput “請輸入一個攝氏溫度的值：請輸入一個攝氏溫度的值：” to c?”華氏溫度為：華氏溫度

10、為：”,ctf (c)function ctfpara x& parameters y=x*(9/5)+32return y 提問：該函提問：該函數(shù)可以如系數(shù)可以如系統(tǒng)函數(shù)一樣統(tǒng)函數(shù)一樣使用嗎？使用嗎？第第 9 9 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.4 模塊化設(shè)計模塊化設(shè)計3、自定義函數(shù)、自定義函數(shù)應(yīng)用舉例：應(yīng)用舉例：1、自定義一個攝氏溫度轉(zhuǎn)換為華氏溫度的函數(shù)：、自定義一個攝氏溫度轉(zhuǎn)換為華氏溫度的函數(shù)：ctf()。方式二：方式二：獨立獨立自定義函數(shù)自定義函

11、數(shù):ctf()程序如下：程序如下：ctf.prgpara x& parameters y=x*(9/5)+32return y在命令窗口測試：在命令窗口測試：ctf()在程序中測試：在程序中測試：ctf()提問：如何提問：如何使用該函數(shù)？使用該函數(shù)？第第 1010 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.5 內(nèi)存變量的作用域內(nèi)存變量的作用域內(nèi)存變量的分類：內(nèi)存變量的分類：全局變量、局部變量、私有變量、隱藏變量全局變量、局部變量、私有變量、隱藏變量全局變量：全局變

12、量：概念：指在概念：指在整個系統(tǒng)各級程序中都有效整個系統(tǒng)各級程序中都有效的內(nèi)存變量。的內(nèi)存變量。定義：定義：public，先定義后使用。局部變量局部變量概念：指在概念：指在本級程序中有效本級程序中有效的內(nèi)存變量。的內(nèi)存變量。定義：定義：local，先定義后使用。，先定義后使用。私有變量私有變量概念：指在概念：指在本級及下級子程序中都有效本級及下級子程序中都有效的內(nèi)存變量。的內(nèi)存變量。定義：默認方式，直接賦值使用。定義：默認方式，直接賦值使用。隱藏變量隱藏變量概念：將高層程序中創(chuàng)建的、與隱藏變量同名的全局變量和私有變量概念：將高層程序中創(chuàng)建的、與隱藏變量同名的全局變量和私有變量隱藏起來。是私有變

13、量的一種特例。隱藏起來。是私有變量的一種特例。定義：定義：private，不創(chuàng)建，只是隱藏指定變量。，不創(chuàng)建，只是隱藏指定變量。第第 11 11 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.5 內(nèi)存變量的作用域內(nèi)存變量的作用域例例1：分別計算：分別計算100以內(nèi)，以內(nèi)，200以內(nèi)，以內(nèi)，300以內(nèi)的奇數(shù)之和。以內(nèi)的奇數(shù)之和。第第 1212 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)

14、化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v課堂練習課堂練習1、利用、利用過程文件過程文件完成多圖形繪制。完成多圖形繪制。2、定義一個測試是否為素數(shù)的函數(shù)：、定義一個測試是否為素數(shù)的函數(shù)：prime()Function primeInput “請輸入一個自然數(shù)：請輸入一個自然數(shù)：” to nFlag=.t.for i=2 to sqrt(n)If mod(n,i)=0Flag=.f.exitEndifNextIf flag?n,”是素數(shù)是素數(shù)”Else?n,”不是素數(shù)不是素數(shù)”Endif第第 1313 頁頁Computer Education department of Hunan Normal Univers

15、ity第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.5 數(shù)組的應(yīng)用數(shù)組的應(yīng)用第第 1414 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.5 數(shù)組的應(yīng)用數(shù)組的應(yīng)用第第 1515 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.5 數(shù)組的應(yīng)用數(shù)組的應(yīng)用第第 1616 頁頁Computer Education department of Hunan Norma

16、l University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v3.5 數(shù)組的應(yīng)用數(shù)組的應(yīng)用第第 1717 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v數(shù)組的應(yīng)用數(shù)組的應(yīng)用第第 1818 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v程序設(shè)計綜合練習程序設(shè)計綜合練習為什么？驗證！為什么？驗證！第第 1919 頁頁Computer Education depa

17、rtment of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v程序設(shè)計綜合練習程序設(shè)計綜合練習Input “請輸入一個自然數(shù)：請輸入一個自然數(shù)：” to nflag=.t.for i=2 to sqrt(n) |n/2 |n-1 If mod(n,i)=0 flag=.f. exit endifnextIf flag ?n,”是素數(shù)是素數(shù)”else ?n,”不是素數(shù)不是素數(shù)”endif可以刪除該語句可以刪除該語句嗎？為什么？嗎？為什么？第第 2020 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v程序設(shè)計綜合練習程序設(shè)計綜合練習s=0for n=100 to 1000 flag=.t. for i=2 to sqrt(n) If mod(n,i)=0 flag=.f. exit endif nextendforIf flag s=s+1endifFlag=.t. ？為什么？為什么？第第 2121 頁頁Computer Education department of Hunan Normal University第第3 3章章 結(jié)構(gòu)化程序設(shè)計結(jié)構(gòu)化程序設(shè)計v程序設(shè)計綜合練習程序設(shè)計綜合練習for i=