【正文】 錄指針從表的首記錄一直找到最后 1條記錄都未發(fā)現(xiàn)該姓名記錄時，記錄指針才最后停在文件尾，此時 eof()為真值；相反，若 eof()取假值，則表示記錄指針停在待查人的記錄上。 說明： （ 1）語句序列又可以是 IF結(jié)構(gòu)，稱為 IF語句的嵌套。 選擇結(jié)構(gòu)程序設(shè)計 、單條件選擇語句 IF 雙分支結(jié)構(gòu)格式一： IF 條件 語句序列 ENDIF 執(zhí)行過程是：如果所給定的條件為真，則執(zhí)行“語句序列”，否則執(zhí)行 ENDIF之后的語句。 運行情況如圖 96所示。 程序結(jié)束語句 RELEASE 語句的格式： RELEASE THISFORM RELEASE方法的格式為： 作用終止表單運行。 （ 3） WINDOWS [AT 行，列 ]指定顯示信息的窗口在屏幕上的位置。 順序結(jié)構(gòu)程序設(shè)計 程序暫停語句 WAIT [提示信息 ] [TO 內(nèi)存變量 ] [WINDOWS [AT 行 ,列]][TIMEOUT n]。 程序的注釋 （ 1）行首注釋 NOTE [注釋內(nèi)容 ] 或 * [注釋內(nèi)容 ]注釋內(nèi)容可以是任何文字，程序不執(zhí)行以NOTE或 *開頭的語句，只起給程序說明的作用。 一般格式是： STORE 表達(dá)式 TO 變量名表 或 變量名 =表達(dá)式 說明： （ 1）表達(dá)式可以是算術(shù)表達(dá)式、字符串表達(dá)式、日期表達(dá)式、關(guān)系表達(dá)式或邏輯表達(dá)式。 八 .返回語句： 格式： return 功能： 返回調(diào)用處或命令窗口。一般，我們在程序文件的開頭都加上該語句，抑制顯示中間結(jié)果。 【 例 】 :編寫程序文件 ，輸入 1個工資，查詢工資為此數(shù)值的有多少人。amp。注釋內(nèi)容 功能： 為程序中的語句作注釋，注釋內(nèi)容不會執(zhí)行。 1個問號為換行輸出， 2個問號為不換行輸出 【 例 】 編制 1個命令文件 ，保存到 f:\myvfp中，統(tǒng)計“教師工資表”中的獎金和工資總額。 圖 92使用命令編制程序文件 ，按 ctrl+w保存 圖 92使用命令編制程序件 do abc命令運行程序文件 ，會出現(xiàn)一個對話框，我們點了對話框中的“確定”后，系統(tǒng)就自動退出了，為什么會這樣呢 ?程序文件執(zhí)行時，會批量、依次執(zhí)行文件中的命令 .執(zhí)行第 1個消息框函數(shù)，程序進(jìn)入暫停，等待用戶選擇。如圖 91所示。 程序的建立和執(zhí)行 程序的建立和執(zhí)行 此前我們學(xué)習(xí)的命令，都是在交互狀態(tài)下，輸入一條命令即回車，馬上即可見到結(jié)果。 應(yīng)用程序： 指為完成專門工作而設(shè)計的一組相互聯(lián)系的例行程序和子程序。 源程序： 由人用源語言編寫的計算機(jī)程序，必須翻譯成機(jī)器語言后才能被執(zhí)行。面向?qū)ο蟪绦蛟O(shè)計類、對象、屬性、事件、方法設(shè)計類、子類、對象（設(shè)計外觀、設(shè)置屬性、為事件編寫方法程序）將應(yīng)用程序分解成具有特定屬性的對象，通過調(diào)用各對象的不同方法來完成相關(guān)事件，是事件驅(qū)動的 。 第九章 程序設(shè)計 程序的建立和執(zhí)行 程序中的常用語句 順序結(jié)構(gòu)程序設(shè)計 選擇結(jié)構(gòu)程序設(shè)計 循環(huán)結(jié)構(gòu)程序設(shè)計 自定義函數(shù)、過程及其調(diào)用 程序的調(diào)試 習(xí)題 9 程序的建立和執(zhí)行 . 基本概念 程 序： 為解決某一問題而設(shè)計的一系列指令。 目標(biāo)程序： 是源程序經(jīng)過編譯后所產(chǎn)生的機(jī)器語言程序。在 VFP中是指一組 Visual FoxPro 程序、表單、菜單和其他文件經(jīng)項目管理器連編后形成的單個程序，不能脫離VFP環(huán)境運行，擴(kuò)展名為 .APP。但這種工作方式不能完全滿足我們的工作需要，有時，我們需要系統(tǒng)能自動、批量地完成一系列命令。 圖 91程序文件的建立 圖 91程序文件的建立 (2) 在彈出的編輯窗口中輸入代碼，按 ctrl+w保存，在“另存為”對話框中選保存位置，并輸入文件名 程序的建立和執(zhí)行 程序的建立和執(zhí)行 方式二： (1).使用命令，格式： modify mand [路徑 ][文件名 ] (2).程序文件的執(zhí)行：在命令窗口輸入 do 文件名，回車。我們單擊了“確定”按鈕后，程序繼續(xù)執(zhí)行下一條命令“ quit”，退出系統(tǒng) vfp支持 3種基本程序控制構(gòu)造 :順序結(jié)構(gòu)，選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu)。 程序文件內(nèi)容 : use 教師工資表 count all to m sum all 工資 to n ?“獎金為：”， m ?“工資總額為：”， n 運行結(jié)果如圖 93所示。 三 .輸入字符串語句： 格式 :accept 字符串 to 內(nèi)存變量 功能 :執(zhí)行該語句時，暫停程序的運行，在屏幕上顯示“字符串”的內(nèi)容作為提示信息，等待用戶通過鍵盤輸入數(shù)據(jù)；輸入數(shù)據(jù)后回車，輸入的內(nèi)容保存到指定的內(nèi)存變量中，同時，程序繼續(xù)向下執(zhí)行。該語句的功能是返回調(diào)用處 運行結(jié)果如圖 94所示。 程序文件內(nèi)容： use 教師工資表 input “請輸入待查工資：” to gz list 教師編號，工資 for 工資 =gz use return 運行結(jié)果如圖 95所示 圖 95工資查詢顯示 程序中的常用語句 五 .清屏語句： 格式： clear 功能： 清除主屏幕上的顯示信息。 七 .顯示提示信息： 格式： wait window 提示信息字符串 at 行，列 [timeout 秒數(shù) ] 功能： 在屏幕的指定位置出現(xiàn)提示窗口。該語句可省略，因為在每個程序執(zhí)行的最后，系統(tǒng)都會自動執(zhí)行 1個 return語句。 （ 2） STORE可以給多個變量賦同一個值， =一次只給一個變量賦值。 （ 2）行尾注釋 amp。 說明： （ 1）“提示信息”是指要顯示的自定義信息。若省略 AT則在屏幕右上角。 順序結(jié)構(gòu)程序設(shè)計 程序舉例 下面是最簡單的 1種程序結(jié)構(gòu) 【 例 】 ：順序結(jié)構(gòu)例程程序名為 。 圖 96計算圓的面積 選擇結(jié)構(gòu)程序設(shè)計 在科學(xué)計算中，只有順序結(jié)構(gòu)是不夠的，只有能根據(jù)某個給定條件選擇不同的執(zhí)行流程才能真正體現(xiàn)計算機(jī)的另一大功能 ——邏輯判斷。流程圖見圖 97。（ 2） IF和 ENDIF必須成對出現(xiàn)。即當(dāng) .()為真時，記錄指針停在待查人的記錄上，查到的指定的記錄。 （ 2）當(dāng)條件為假時，函數(shù)返回表達(dá)式 2的值。 （ 2）在執(zhí)行 DO CASE語句時，依次判斷各條件是否成立。 （ 4）如果沒有一個條件成立，就執(zhí)行 OTHERWISE后面的語句序列，如果沒有OTHERWISE就不作任何操作，就轉(zhuǎn)向 ENDCASE后面的語句。在編程中常常遇到這樣的情況：某一類問題的計算和處理方法完全一樣，只是要要求重復(fù)計算多次，而每次使用的數(shù)據(jù)都按照一定的規(guī)律改變。 按照循環(huán)體執(zhí)行的方式和條件，循環(huán)結(jié)構(gòu)分為當(dāng)型、直到型與步長型三種。若 條件 為假，則結(jié)束循環(huán)，轉(zhuǎn)去執(zhí)行 ENDDO之后的語句。 （ 3） LOOP是無條件循環(huán)命令。步長型循環(huán)可以根據(jù)給定的次數(shù)重復(fù)執(zhí)行循環(huán)體。如果少略STEP子句，則默認(rèn)步長為 1。操作表時，使用該語句功能強(qiáng)，效率高。 圖 914顯示黨員的姓名和職稱 自定義函數(shù)、過程及其調(diào)用 自定義函數(shù) 自定義函數(shù)是用戶根據(jù)需要把特定的需重復(fù)調(diào)用的子程序編寫成函數(shù)，這有別于VFP的標(biāo)準(zhǔn)函數(shù)。 （ 2）參數(shù)表 是函數(shù)中使用的形式參數(shù)?？墒褂妹?MODIFY COMMAND 函數(shù)名建立或編輯自定義函數(shù)。這些共用程序在有些高級語言中稱為子程序，在 vfp中稱為過程。建立外部過程的方法與建立源程序 (即程序文件 )的方法完全相同，其擴(kuò)展名也是 .prg。 Commands 過程體語句。被調(diào)用的程序必須有一條 RETURN語句，以返回調(diào)用它的主程序。 RETURN命令的格式如下 ： RETURN [eExpression|TO MASTER|TO ProcedureName] 說明： eExpression 指定返回給調(diào)用程序的表達(dá)式。 自定義函數(shù)、過程及其調(diào)用 過程的調(diào)用 在 vfp中，無論內(nèi)部過程還是外部過程，都可用 do命令調(diào)用 格式： do 過程名 with 表達(dá)式表列 【 例 】 :設(shè)計一個通過調(diào)用內(nèi)部過程計算圓面積的程序。定義內(nèi)部過程，過程名為 area parameters r， s s=*r*r return 運行結(jié)果如圖 915所示。不過很多時候都沒什么幫助。改完后，再次運行程序前，最好將所有的數(shù)據(jù)庫及表關(guān)閉，以免在程序打開一個數(shù)據(jù)表時出現(xiàn)表已打開的錯誤，比較好的辦法是在程序開頭先關(guān)閉所有的數(shù)據(jù)庫及表。 一般不要選擇忽略，因為程序中上下語句都有很緊密的關(guān)系，當(dāng)一條語句出錯后，如果繼續(xù)運行，可能會出現(xiàn)很多錯誤，而后面出錯的語句可能并沒有錯，是因為前面錯了才導(dǎo)致后面的語句出錯，如果前面正確，后面也會正確，因此對于初學(xué)者來說，選擇忽略不利于找出錯誤所在。 圖 918程序中用錯了語句 有時光看語句，怎么也看不出問題在哪，這就用采用一些輔助手段，最常用的輔助手段是在可能發(fā)生問題的地方將程序掛起，即在程序中加一句 suspend，當(dāng)程序運行到這里時將程序掛起，然后在命令窗口中查看各有關(guān)變量的值或數(shù)據(jù)表的情況。 程序的調(diào)試 常見錯誤 啟動一個表單后，再用代表這個表單的變量去調(diào)用它時卻不行。這往往是因為記錄指針到尾部，即 EOF()真。這是因為沒有設(shè)置跳出循環(huán)的條件，或者條件永遠(yuǎn)不能滿足，比如一個循環(huán)的跳出條件是當(dāng)一個變量的值達(dá)到某一數(shù)值，每循環(huán)一次應(yīng)將該變量加 1，但忘了加1的語句，就會造成死循環(huán)，因為變量的值永遠(yuǎn)達(dá)不到預(yù)定的數(shù)值。 不管是英文還是中文，還是查不到所要的記錄。往往是因為沒有記錄。+STR(5amp。男 39。必須要在注釋信息前加上規(guī)定的符號（ ），使注釋信息變?yōu)榫G色，方不被程序執(zhí)行。 或 * 28 .程序的控制結(jié)構(gòu)有幾種（ ）。 SET TALK OFF ______ FOR Y=1 TO N P=P*Y ENDFOR RETU A. P=P*X B. P=1 C. Y=1 D. Y=0 39．試寫出程序執(zhí)行后的結(jié)果 : SET TALK OFF STORE 0 TO M FOR N=1 TO 8 M=M+N ENDFOR ?“M=”,M 結(jié)果為 __________. A. 36 B. 35 C. 30 D. 26 習(xí)題 9 40．已有職工登記庫 ，記錄如下： 分析以下程序的執(zhí)行結(jié)果： SET TALK OFF USE ZGDJ SCAN FOR NOT HF IF XB=“女” REPLACE JBGZ WITH JBGZ+50 ENDIF ?XM+“基本工資為” +STR(JBGZ) ENDSCAN 執(zhí)行結(jié)果為： ________________________. A. 李麗基本工資為 2220 B. 李麗基本工資為 2250 C. 李麗基本工資為 2240 D. 李麗基本工資為 2200 RECO