第4章 程序設(shè)計初步

中篇程序設(shè)計4程序設(shè)計初步重點與難點

1、程序文件的建立和修改2、程序的控制結(jié)構(gòu)：

三種結(jié)構(gòu)

順序結(jié)構(gòu)選擇（分支）結(jié)構(gòu)循環(huán)結(jié)構(gòu)程序設(shè)計4.1程序文件4.1.1程序文件的建立與執(zhí)行一、程序文件的建立與修改命令格式：

modifycommand<文件名/？>功能：打開文件編輯窗口，用來建立或修改程序文件參數(shù)描述：[<文件名>]：為可選項，指定打開或創(chuàng)建的程序文件名。若不指定新建程序文件的擴(kuò)展名，VFP自動指定.PRG為擴(kuò)展名。MODIFYCOMMAND命令支持含有“*”和“？”通配符的文件。名稱與這個匹配的每一個文件都在編輯窗口中打開。若省略文件名，將給打開的編輯窗口賦一個初始名稱“程序1.PRG”。當(dāng)關(guān)閉編輯窗口時，可以用另外的文件名保存該文件。[？]：顯示“打開”對話框。可以從中選擇一個已有程序或輸入要創(chuàng)建的新程序名。程序設(shè)計初步二、運行程序:下面任一方法均可運行程序1選擇【程序】菜單下的“運行”菜單，利用“運行”對話框選擇要運行的程序；2在命令窗口中輸入如下命令：

DO<文件名>系統(tǒng)就會運行這個程序。如果文件不加擴(kuò)展名，系統(tǒng)會假定它具有.PRG的擴(kuò)展名，如果想運行一個具有其它擴(kuò)展名的命令文件時，在輸入命令時必須給出這個命令文件的全名。如：DOL501然后按回車鍵執(zhí)行。程序設(shè)計初步

三、程序書寫規(guī)則1命令分行程序中每條命令都以回車鍵結(jié)尾，一行只能寫一條命令。若命令需分行書寫，應(yīng)在一行末尾鍵入續(xù)行符“；”，然后按回車鍵。2命令注釋注釋行以符號“*”開頭。命令后也可添加注釋，這種注釋以符號“&&”開頭程序設(shè)計初步

四、求解的基本邏輯與程序通用性1求解的基本思路解決問題的基本思路是：輸入數(shù)據(jù)→處理數(shù)據(jù)→輸出數(shù)據(jù).例如：計算圓面積，須依次完成下列操作：（1）給出圓半徑（2）按公式s=∏r2計算圓面積（3）輸出圓面積VFP程序用命令來描述這個過程：

r=3s=3.1416*r*r?“圓面積=”,s程序設(shè)計初步4.1.2程序文件中的專用命令一、程序結(jié)尾的專用命令return：在程序的末尾，使程序執(zhí)行結(jié)束，并返回到調(diào)用它的上級程序繼續(xù)執(zhí)行，若無上級程序則返回到命令窗口。cancel:是程序終止，清除程序的私有變量，并返回到命令窗口。quit：退出VFP系統(tǒng)。程序設(shè)計初步二、輸入輸出專用命令

格式：@<行號,列號>SAY<表達(dá)式>[get<變量名>][default<表達(dá)式2>]功能：從指定的行、列號開始輸出表達(dá)式的值。說明：1<表達(dá)式>可以是常數(shù)、字段變量及由它們組成的表達(dá)式。2定位輸出時，一次只能輸出一個表達(dá)式。

程序設(shè)計初步3.GET子句中的變量必須具有初值，或用DEFAULT子句的<表達(dá)式指定>初值。初值一旦指定，該變量的類型在編輯期間就不能改變。

4.GET子句的變量必須用READ命令來激活，即在若干帶有GET子句的輸入輸出命令后，必須遇到READ命令才能編輯GET變量。

例：試編一程序，輸入半徑值，求面積。clearr=0@2,10SAY“請輸入半徑：”GETrREADs=3.14159*r*r@4,10SAY“圓的面積為：”+str(s,8,3)程序設(shè)計初步三、WAIT命令命令格式：

wait[<信息文本>][to<內(nèi)存變量>]功能：暫停程序的運行，直到用戶輸入一個字符，例如輸入Y或N。也可只用輸出一條提示信息例如：wait“請檢查輸入內(nèi)容”程序設(shè)計初步四、accept命令命令格式：

accept[<信息文本>]to<內(nèi)存變量>功能：暫停程序的運行，直到用戶輸入一串字符。例如：accept“請輸入姓名：”tonn程序設(shè)計初步五、input命令命令格式：

input[<信息文本>]to<內(nèi)存變量>功能：暫停程序的運行，直到用戶輸入.可以輸入字符，數(shù)值，等各種類型的數(shù)據(jù)例如：clearinput"請輸入半徑："tor s=3.14159*r*r ?"圓的面積為：" ??S程序設(shè)計初步input命令可以出入字符類型，注意輸入時要加定界符?？梢暂斎霐?shù)值型數(shù)據(jù)?？梢暂斎脒壿嬓蛿?shù)據(jù)，加圓點定界符可以輸入日期類型的數(shù)據(jù)，輸入時可以用ctod函數(shù)進(jìn)行轉(zhuǎn)換，或{^yyyy-mm-dd}格式輸入。4.2程序的控制結(jié)構(gòu)

順序結(jié)構(gòu)程序運行時按語句排列的先后順序，一條一條地依次執(zhí)行。

程序設(shè)計初步AB例如：從鍵盤輸入兩個數(shù)據(jù)，通過程序交換兩個數(shù)，并輸出。AB程序設(shè)計初步分支結(jié)構(gòu)一、簡單的條件語句格式：IF<邏輯表達(dá)式><語句序列>ENDIF語句序列P.T.程序設(shè)計初步二、帶ELSE的條件語句

格式：IF<條件表達(dá)式> <語句序列1> [ELSE <語句序列2>] ENDIF

語句序列2語句序列1P例如：從鍵盤輸入一個數(shù)據(jù)，通過程序判斷該數(shù)是偶數(shù)還是奇數(shù)？程序設(shè)計初步

宏代換函數(shù)：格式：&<字符型內(nèi)存變量>功能：替換出字符型內(nèi)存變量的值例如：m=5x=“m”?X&&顯示m?&x&&顯示5，得到了變量X的值程序設(shè)計初步三、多分支語句格式：DOCASECASE<條件表達(dá)式1> <語句序列1>[CASE<條件表達(dá)式2> <語句序列2> …CASE<條件表達(dá)式N> <語句序列N>][OTHERWISE<語句序列N+1>]ENDCASE

INPUT"請輸入成績（1--5）："toxDOCASEcasex=5?space(10)+"excellent"casex=4?space(10)+"Good"casex=3?space(10)+"Pass"casex=2?space(10)+"Fail"OTHERWISE:?space(10)+"Poor"ENDCASE

例如：從鍵盤輸入成績，給出評語。程序設(shè)計初步

循環(huán)結(jié)構(gòu)(條件循環(huán),步長循環(huán),掃描循環(huán)）

一、條件循環(huán)

格式：DOWHILE<條件表達(dá)式> [<語句序列>] [EXIT] [LOOP] ENDDO例如：輸出100內(nèi)的偶數(shù)I=0DOWHILEI<=100??II=I+2ENDDOP語句序列FT參數(shù)描述：

<條件表達(dá)式>：指定一個邏輯表達(dá)式，它的值決定是否執(zhí)行DOWHILE和ENDDO之間的命令集合。如果<條件表達(dá)式>的值為“真”，就執(zhí)行命令集。

[<語句序列>]：指定當(dāng)<條件表達(dá)式>計算為“真”時要執(zhí)行的VFP命令集。

[LOOP]：直接將程序控制返回到DOWHILE語句，并重新計算條件值。LOOP可以放在DOWHILE和ENDDO之間的任何位置。

[EXIT]：將程序控制從DOWHILE和ENDDO循環(huán)的內(nèi)部轉(zhuǎn)到ENDDO后的第一條命令。EXIT可以放在DOWHILE和ENDDO之間的任何位置。

ENDDO：表明DOWHILE語句的結(jié)束

程序設(shè)計初步

二、步長循環(huán)格式：FOR<內(nèi)存變量>=<初始值>TO<終值>[STEP<步長>] <語句序列> [EXIT] [LOOP] ENDFOR/NEXT

P語句序列FT

參數(shù)描述：

<內(nèi)存變量>：指定作為計數(shù)器的內(nèi)存變量或數(shù)組元素。在執(zhí)行FOR…ENDFOR語句之前，此內(nèi)存變量或數(shù)組元素不一定存在。

<初始值>TO<終值>：<初始值>是計數(shù)器的初始值，而<終值>是計數(shù)器的終止值。

[STEP<步長>]：是計數(shù)器遞增或遞減的步長。如果<步長>是負(fù)值，則計數(shù)器遞減；如果省略STEP子句，計數(shù)器每次遞增1。

<語句序列>：指定要執(zhí)行的VFP命令，它可以包含任意數(shù)量的命令。

程序設(shè)計初步例：求1到100中偶數(shù)的和

AA=0FORI=2TO100STEP2 AA=AA+IENDFOR？AA程序設(shè)計初步

三、掃描循環(huán)格式：SCAN[<范圍>][FOR<條件>][WHILE<條件>] [<語句序列>] [LOOP] [EXIT] ENDSCAN功能：針對表的記錄操作的循環(huán)函數(shù)。掃描表的所有記錄執(zhí)行相應(yīng)的語句序列。例如：use學(xué)生成績表scanfor性別=“女”？？編號，姓名endscan

參數(shù)描述：

[<范圍>]：指定對當(dāng)前表中記錄掃描的范圍。只有在范圍之內(nèi)的記錄才有可能掃描到。SCAN命令的默認(rèn)范圍為ALL。

[FOR<條件>]：只有條件表達(dá)式的計算結(jié)果為“真”的記錄，才能對其執(zhí)行命令。包含F(xiàn)OR子句可以篩選出不想掃描的記錄。

[WHILE<條件>]：指定一個邏輯表達(dá)式作為執(zhí)行命令的條件，只要邏輯表達(dá)式計算為“真”，就對記錄執(zhí)行命令，直到遇到使表達(dá)式不為“真”的記錄為止。

[<語句序列>]：指定要執(zhí)行的VFP命令集。

【例】逐條顯示STUDENT表中男生的情況。USESTUDENTSCANFOR性別=”男” DISP WAITENDSCANUSE或者使用下列代碼USESTUDENTSCAN IF性別#”男” LOOP ENDIFDISP WAITENDSCANUSEVFP6程序文件練習(xí)1、VFP有兩類工作方式，分別是（）和（）。2、VFP程序設(shè)計包括結(jié)構(gòu)化程序設(shè)計和（）。建立程序3、建立或修改程序文件的命令是（），程序文件的擴(kuò)展名是（）。4、關(guān)閉窗口的方法有幾種，分別是什么？5、文本編輯窗口只能編輯.prg文件嗎？運行程序6、執(zhí)行程序文件的命令是（），其中的文件名是否可以不加擴(kuò)展名.prg？程序書寫規(guī)則7、有關(guān)命令分行的規(guī)則是什么？8、有關(guān)命令注釋的規(guī)則是什么？退出VFP6程序文件9、VFP程序解決問題的基本邏輯是（）。10、什么是程序的通用性，試舉例說明？程序結(jié)尾的專用命令11、RETURN命令的功能是什么？12、CANCEL命令的功能是什么？13、QUIT命令的功能是什么？定位輸入輸出命令@<行，列>[SAY<表達(dá)式1>][GET<>][DEFAULT<>]輸出提示信息14、WAIT命令宏代換函數(shù)15、&<字符型內(nèi)存變量>[.<字符表達(dá)式>]

一、選擇題1.一個過程文件可以包含多個過程，每個過程的第一條語句是A)PARAMETERB)DO<過程名>C)<過程名>D)PROCEDURE<過程名>2.比較WAIT、ACCEPT和INPUT三條命令，需要以回車鍵表示輸入結(jié)束的命令是A)WAIT、ACCEPT、INPUTB)WAIT、ACCEPTC)ACCEPT、INPUTD)INPUT、WAIT程序設(shè)計測驗第3題閱讀下列程序，此程序執(zhí)行后的輸出結(jié)果是3。SETTALKOFFX=1DOWHILEX<20X=5*XENDDO？XSETTALKON3.A）5B）25C）50D）125第4題下列程序的執(zhí)行結(jié)果是4。SETTALKOFFS=0FORI=1TO5S=S+IENDFOR？SSETTALKON4.A）10B）15C）20D）25第3題閱讀下列程序，此程序執(zhí)行后的輸出結(jié)果是3。SETTALKOFFX=1DOWHILEX<20X=5*XENDDO？XSETTALKON3.A）5B）25C）50D）125第4題下列程序的執(zhí)行結(jié)果是4。SETTALKOFFS=0FORI=1TO5S=S+IENDFOR？SSETTALKON4.A）10B）15C）20D）25第5題執(zhí)行下列程序，其輸出結(jié)果是5。SETTALKOFFX=[13+7]?XSETTALKON5.A）[13+7]B）20C）13+7D）20.006．有如下程序主程序：ZCX.PRG子程序：ZCX1.PRGSETTALKOFFK1=K1+'200'K1='12'RETURN？K1DOZCX1？K1RETURN用命令DOZCX運行程序后，屏幕顯示的結(jié)果為A)12B)12C)12D)1220021212200127．執(zhí)行如下程序SETTALKOFFS＝0I＝1INPUT“N＝？”TONDOWHILES<＝NS＝S＋I(xiàn)I＝I＋1ENDDO？SSETTALKON如果輸入N值為5，則最后S的顯示值是A)1B)3C)5D)68.在VFP中，用于建立過程文件PROG1的命令是A)CREATERPOG1B)MODIFYCOMMANDPROG1C)MODIFYPROG1D)EDITPROG19.有如下程序SETTALKOFFCLEARAA=“全國計算機(jī)等級考試”BB=“九八”CC=“一”?AA??BB+“年第”+CC+“次考試”執(zhí)行程序后，屏幕顯示A)全國計算機(jī)等級考試九八年第一次考試B)全國計算機(jī)等級考試九八年第一次考試C)全國計算機(jī)等級考試BB年第CC次考試D)全國計算機(jī)等級考試BB年第CC次考試10.有程序如下SETTALKOFFUSECJM->ZF=0DOWHILE.NOT.EOF()M->ZF=M->ZF+ZFSKIPENDDO?M->ZFRETURN其中數(shù)據(jù)表文件CJ.DBF中有2條記錄，內(nèi)容如下：