vf05第五章-結構化程序設計課件

第五章

結構化程序設計1第五章

結構化程序設計1第一節(jié)程序文件

一、VisualFoxPro程序的幾點說明

1．注釋語句【格式1】*<注釋內(nèi)容>【格式2】&&<注釋內(nèi)容>【功能】增強程序文件的易讀性2．對話開關語句【格式】SETTALKOFF|ON【功能】關閉或打開命令執(zhí)行時的對話開關3．命令的分行VisualFoxPro程序是命令行的序列，每個命令都以回車鍵結束，一行只能寫一條命令；若一條命令太長，一行寫不下，也可分行書寫，并在分行處加上續(xù)行符“；”，再按回車鍵。2第一節(jié)程序文件一、VisualFoxPro程序的二、程序文件的建立、修改與執(zhí)行

1．建立或修改程序文件

1)命令方式：

MODIFYCOMMAND〈程序文件名〉2)菜單方式：打開“文件”菜單，選擇“新建”；在“新建”窗口，選擇“程序”，再選擇“新建文件”

3二、程序文件的建立、修改與執(zhí)行1．建立或修改程序文件3

3)項目管理器：選定項目管理器“代碼”選項卡中的“程序”項，選擇“新建”命令。2．保存程序文件

程序輸入、編輯完畢，單擊【文件】|【保存】菜單項，或按Ctrl+W復合鍵，在“另存為”對話框中指定程序文件的存放位置和文件名，并單擊“保存”按鈕保存程序文件并退出文本編輯器。程序文件的默認擴展名是.PRG。

43)項目管理器：43．執(zhí)行程序文件程序文件建立后，可以用多種方式、多次執(zhí)行它。下面是兩種常用的方式。1）菜單方式①單擊【程序】→【運行】菜單項，打開“運行”對話框；②從文件列表框中選擇要運行的程序文件，并單擊“運行”命令按鈕，啟動運行該程序文件2）命令方式【格式】DO[<盤符>][<路徑>]<文件名>【功能】執(zhí)行指定<盤符>、<路徑>下的程序文件當程序文件被執(zhí)行時，文件中包含的命令將被依次執(zhí)行，直到所有命令被執(zhí)行完畢。53．執(zhí)行程序文件5第二節(jié)程序的基本結構

由順序、分支、循環(huán)三種基本結構構成。（1）順序結構，如圖6-1所示，該結構先執(zhí)行A操作，再執(zhí)行B操作。（2）分支結構：如圖6-2所示，該結構中P代表一個條件，當條件P成立時執(zhí)行A操作，否則執(zhí)行B操作。

圖6-1順序結構流程圖圖6-2分支結構流程圖

6第二節(jié)程序的基本結構由順序、分支、循環(huán)三種基本結構構成（3）循環(huán)結構：循環(huán)結構則能夠使某些語句或程序段重復執(zhí)行若干次。如果某些語句或程序段需要在一個固定的位置上重復操作，使用循環(huán)是最好的選擇。7（3）循環(huán)結構：循環(huán)結構則能夠使某些語句或程序段重復執(zhí)行若干三條輸入命令的異同

ACCEPT[<提示信息>]TO<內(nèi)存變量>ACCEPT命令只能接受字符型數(shù)據(jù)，不需定界符，輸入完畢按回車鍵結束。WAIT[<提示信息>][TO<內(nèi)存變量>]WAIT命令只能輸入單個字符，且不需定界符，輸入完畢不需按回車鍵。INPUT[<提示信息>]TO<內(nèi)存變量>

INPUT命令可接受數(shù)值型、字符型、邏輯型、日期型和日期時間型數(shù)據(jù)，如果是字符串，需用定界符，輸入完畢按回車鍵結束。

8三條輸入命令的異同8分支結構形式有如下三種：1．單向分支單向分支語句，即根據(jù)用戶設置的條件表達式的值，決定某一操作是否執(zhí)行?！菊Z句格式】

IF〈條件表達式〉〈命令行序列〉

ENDIF【語句功能】該語句首先計算〈條件表達式〉的值，當〈條件表達式〉的值為真時，執(zhí)行〈命令行序列〉；否則，執(zhí)行ENDIF后面的第一條命令。三、分支結構

9分支結構形式有如下三種：三、分支結構9【例6-9】求一元二次方程AX2＋BX＋C＝0的實根。程序文件名為PROG9.PRG。SETTALKOFFCLEARINPUTTOAINPUTTOBINPUTTOCZ＝B^2-4*A*CIFZ>=0X1=(-B+SQRT(Z))/(2*A)X2=(-B-SQRT(Z))/(2*A)?X1,X2ENDIFSETTALKON10【例6-9】求一元二次方程AX2＋BX＋C＝0的實根。程序文

2．雙向分支

雙向分支語句，即根據(jù)用戶設置的條件表達式的值，選擇兩個操作中的一個來執(zhí)行?！菊Z句格式】

IF〈條件表達式〉〈命令行序列1〉ELSE〈命令行序列2〉ENDIF【語句功能】

該語句首先計算〈條件表達式〉的值，當〈條件表達式〉的值為真時，執(zhí)行〈命令行序列1〉中的命令；否則，執(zhí)行〈命令行序列2〉中的命令；執(zhí)行完〈命令行序列1〉或〈命令行序列2〉后都將執(zhí)行ENDIF后面的第一條命令。112．雙向分支11【例6-10】編寫一密碼校驗程序（假設密碼為ABC）。程序文件名為PROG10.PRG。SETTALKOFFCLEARACCEPT“請輸入您的密碼：”TOAAAIFAAA=”ABC”CLEAR?”歡迎使用本系統(tǒng)！”ELSE?”密碼錯誤！”ENDIFSETTALKON12【例6-10】編寫一密碼校驗程序（假設密碼為ABC）。程序文

3．多向分支

多向分支語句，即根據(jù)多個條件表達式的值，選擇執(zhí)行多個操作中的一個對應執(zhí)行?！菊Z句格式】

DOCASECASE〈條件表達式1〉<命令行序列1〉CASE〈條件表達式2〉<命令行序列2〉……

CASE〈條件表達式N〉〈命令行序列N〉］［OTHERWISE〈命令行序列N+1〉］

ENDCASE133．多向分支13

【語句功能】

該語句根據(jù)給出的N個〈條件表達式〉的值，選擇N+1個〈命令行序列〉中的一個執(zhí)行。當所有CASE中〈條件表達式〉的值都是假時，如果有OTHERWISE項，則執(zhí)行〈命令行序列N+1〉，再執(zhí)行ENDCASE后面的第一條命令；否則，直接執(zhí)行ENDCASE后面的第一條命令?！纠?-11】假設收入（P）與稅率（R）的關系如下表，編程求稅金。程序文件名為PROG11.PRG。0 P＜800R=0.05 800≤P＜20000.08 2000≤P＜50000.1 P≥5000

14【語句功能】14SETTALKOFFCLEARINPUT“請輸入收入：”TOPDOCASECASEP<800R=0CASEP<2000R=0.05CASEP<5000R=0.08OTHERWISER=0.1ENDCASETAX=P*R?”稅金為：”,TAXSETTALKON15SETTALKOFF15四、循環(huán)結構

1．DOWHILE循環(huán)語句【格式1】DOWHILE<條件表達式><語句序列>

ENDDO

16四、循環(huán)結構1．DOWHILE循環(huán)語句16【格式2】DOWHILE<條件表達式><語句序列1>[LOOP]<語句序列2>[EXIT]<語句序列3>

ENDDOLOOP語句：強行返回到循環(huán)開始語句。EXIT語句：強行跳出循環(huán)，接著執(zhí)行ENDDO后的語句

17【格式2】DOWHILE<條件表達式>LOO【例6-12】編程求1＋2＋3＋……＋100之和。程序文件名為PROG12.PRG。SETTALKOFFCLEARS=0I=1DOWHILEI<=100S=S+II=I+1ENDDO?”1＋2＋3＋……＋100＝”,SSETTALKON18【例6-12】編程求1＋2＋3＋……＋100之和。程序文件名【例6-13】逐條顯示在STUDENT數(shù)據(jù)庫的STUD表中性別為“男”的所有記錄。程序文件名為PROG13.PRG。SETTALKOFFCLEARCLOSEDATABASEALLOPENDATABASESTUDENTUSESTUDDOWHILE.NOT.EOF()IF性別=”男”DISPLAYENDIFSKIPENDDOCLOSEDATABASEALLSETTALKON19【例6-13】逐條顯示在STUDENT數(shù)據(jù)庫的STUD表中性【例6-14】編程顯示STUDENT數(shù)據(jù)庫的STUD表中除“孫業(yè)”以外的所有記錄。程序文件名為PROG14.PRG。SETTALKOFFCLEAR]CLOSEDATABASEALLOPENDATABASESTUDENTUSESTUDDOWHILE.NOT.EOF()IF姓名=”孫業(yè)”

SKIPLOOPENDIFDISPLAYSKIPENDDOCLOSEDATABASEALLSETTALKON20【例6-14】編程顯示STUDENT數(shù)據(jù)庫的STUD表中除“

2．FOR循環(huán)語句

【格式】

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

<語句序列1>

[LOOP]

<語句序列2>

[EXIT]

<語句序列3>

ENDFOR/NEXTFOR語句的執(zhí)行流程如右圖所示。

212．FOR循環(huán)語句21使用FOR循環(huán)語句的有關說明：①省略STEP<步長>，則〈步長〉為默認值1；②〈初值〉、〈終值〉和〈步長〉都可以是數(shù)值表達式，但這些表達式僅在循環(huán)語句開始執(zhí)行時計算一次。循環(huán)語句執(zhí)行過程中，初值、終值和步長是不會改變的，并由此確定循環(huán)的次數(shù)；③EXIT和LOOP命令可以出現(xiàn)在循環(huán)體內(nèi)。執(zhí)行LOOP命令時，結束本次循環(huán)，循環(huán)變量增加一個步長值，返回FOR循環(huán)頭判斷循環(huán)條件是否成立。執(zhí)行EXIT命令時,程序跳出循環(huán)，執(zhí)行循環(huán)尾后面的語句。22使用FOR循環(huán)語句的有關說明：22

3．“指針”型循環(huán)控制語句“指針”型循環(huán)控制語句，即根據(jù)用戶設置的表中的當前記錄指針，決定循環(huán)體內(nèi)語句的執(zhí)行次數(shù)據(jù)?！菊Z句格式】

SCAN［FOR〈條件表達式〉]〈命令行序列〉

ENDSCAN【語句功能】

該語句在指定的范圍內(nèi)，用數(shù)據(jù)記錄指針來控制循環(huán)次數(shù)。執(zhí)行語句時，首先判斷函數(shù)EOF（）的值，若其值為“真”，則結束循環(huán)，否則，結合(條件表達式)，執(zhí)行(命令行序列)，記錄指針移到指定的范圍和條件內(nèi)的下一條記錄，重新判斷函數(shù)EOF()的值，直到函數(shù)EOF()的值為真時結束循環(huán)。233．“指針”型循環(huán)控制語句23【例6-18】輸出STUDENT數(shù)據(jù)庫的STUD表中所有男生的姓名和地址。程序文件名為PROG18.PRG。SETTALKOFFCLEARCLOSEDATABASEALLOPENDATABASESTUDENTUSESTUDSCANFOR性別=“男”?姓名,地址ENDSCANCLOSEDATABASEALLSETTALKON24【例6-18】輸出STUDENT數(shù)據(jù)庫的STUD表中所有男生

4．使用循環(huán)語句時應注意的幾點（1）DOWHILE和ENDDO、FOR和ENDFOR、SCAN和ENDSCAN必須配對使用。（2）<循環(huán)變量〉應是數(shù)值型的內(nèi)存變量或數(shù)組元素。（3）EXIT和LOOP命令嵌入在循環(huán)體內(nèi)，可以改變循環(huán)次數(shù)，但是不能單獨使用。EXIT的功能是跳出循環(huán)，轉(zhuǎn)去執(zhí)行ENDDO、ENDFOR、ENDSCAN后面的第一條命令；LOOP的功能是轉(zhuǎn)回到循環(huán)的開始處，重新對“條件”進行判斷。254．使用循環(huán)語句時應注意的幾點25第三節(jié)過程的模塊化

VFP模塊化在具體實現(xiàn)上提供三種形式，它們是子程序、過程和函數(shù)。一子程序子程序也叫外部過程，是以程序文件（.PRG）的形式單獨存儲在磁盤上。子程序的結構與一般的程序文件一樣，可以用MODIFYCOMMAND命令來建立、修改、和存盤，擴展名也默認為.PRG。子程序與其他程序文件的唯一區(qū)別是其末尾或返回處必須有返回語句RETURN。子程序的調(diào)用：DO<程序文件名>26第三節(jié)過程的模塊化VFP模塊化在具體實現(xiàn)上提供三種形式二、過程(內(nèi)部)

內(nèi)部過程：把多個過程組織在一個文件中(這個文件稱之為過程文件)，或者把過程放在調(diào)用它的程序文件的末尾。過程文件格式為：

PROCEDURE<過程名>[PARAMETER<參數(shù)表>]<命令序列>[RETURN[<表達式>]]

過程有兩種存放方式：（1）把所有的過程集中寫入一個被稱為過程文件（.prg文件）的磁盤文件中（2）直接把過程寫在調(diào)用它的主程序文件中，主程序被打開時，過程同時被調(diào)入內(nèi)存（調(diào)用時可節(jié)省時間）。（3）如果缺省RETURN，則在過程尾部自動執(zhí)行一條隱含的RETURN命令，若不帶<表達式>則返回邏輯值.T.。27二、過程(內(nèi)部)內(nèi)部過程：把多個過程組織在一個文【例6-22】建立如下程序文件，過程放在程序文件中。*MAIN.PRGSETTALKOFF?”正在執(zhí)行主程序”DOSUB1

SETTALKON

ProcedureSUB1

?”正在執(zhí)行SUB1”

RETURN28【例6-22】建立如下程序文件，過程放在程序文件中。28三、過程文件的建立

過程文件的建立方法與程序文件相同。可用MODIFYCOMMAND<過程文件名>命令或調(diào)用其他文字編輯軟件來建立。過程文件的結構一般為：

PROCEDURE<過程名1><命令序列1>RETURN

PROCEDURE<過程名2><命令序列2>RETURN…PROCEDURE<過程名N><命令序列N>RETURN29三、過程文件的建立過程文件的建立方法與程序1．過程文件的調(diào)用

調(diào)用某過程文件中的過程時，必須先打開該過程文件，打開過程文件命令為：【格式】SETPROCEDURETO<過程文件名>

任何時候系統(tǒng)只能打開一個過程文件，當打開一個新的過程文件時，原已打開的過程文件自動關閉。調(diào)用過程文件

DO<過程文件名>WITH參數(shù)表2．過程文件的關閉關閉過程文件可用下列命令：【格式一】SETPROCEDURETO

【格式二】CLOSEPROCEDURE

301．過程文件的調(diào)用30參數(shù)傳遞

當用主程序調(diào)過程時，可以將主程序中的參數(shù)傳遞給過程，在過程中經(jīng)過處理后再返回到主程序。調(diào)用程序的格式：格式1：DO<文件名>︱<過程名>WITH<