【正文】 for 工資 =gz use return 運(yùn)行結(jié)果如圖 95所示 圖 95工資查詢顯示 程序中的常用語(yǔ)句 五 .清屏語(yǔ)句： 格式： clear 功能： 清除主屏幕上的顯示信息。 (2).使用 input時(shí)，輸入字符型數(shù)據(jù)時(shí)，必須加雙引號(hào)等定界符；輸入邏輯型數(shù)據(jù)時(shí)，要用圓點(diǎn)定界符 (如 .T.)；輸入日期型數(shù)據(jù)要用轉(zhuǎn)換函數(shù)，如 ctod（“ 11/15/2022”）。該語(yǔ)句的功能是返回調(diào)用處 運(yùn)行結(jié)果如圖 94所示。 程序文件內(nèi)容： use 學(xué)生情況表 accept “請(qǐng)輸入待查學(xué)生姓名：” to name display 學(xué)號(hào)，姓名，性別 for 姓名 =name use return amp。 三 .輸入字符串語(yǔ)句： 格式 :accept 字符串 to 內(nèi)存變量 功能 :執(zhí)行該語(yǔ)句時(shí)，暫停程序的運(yùn)行，在屏幕上顯示“字符串”的內(nèi)容作為提示信息，等待用戶通過鍵盤輸入數(shù)據(jù)；輸入數(shù)據(jù)后回車，輸入的內(nèi)容保存到指定的內(nèi)存變量中，同時(shí)，程序繼續(xù)向下執(zhí)行。amp。 程序文件內(nèi)容 : use 教師工資表 count all to m sum all 工資 to n ?“獎(jiǎng)金為：”， m ?“工資總額為：”， n 運(yùn)行結(jié)果如圖 93所示。 程序中的常用語(yǔ)句 一 .屏幕輸出語(yǔ)句 :格式 :?|??表達(dá)式 功能 :在屏幕上輸出表達(dá)式的內(nèi)容。我們單擊了“確定”按鈕后，程序繼續(xù)執(zhí)行下一條命令“ quit”，退出系統(tǒng) vfp支持 3種基本程序控制構(gòu)造 :順序結(jié)構(gòu)，選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu)。 四 .使用命令編制一個(gè)程序文件并運(yùn)行它 modify mand F： \myvfp\abc，彈出編輯窗口，如圖 92所示。 圖 91程序文件的建立 圖 91程序文件的建立 (2) 在彈出的編輯窗口中輸入代碼，按 ctrl+w保存，在“另存為”對(duì)話框中選保存位置，并輸入文件名 程序的建立和執(zhí)行 程序的建立和執(zhí)行 方式二： (1).使用命令，格式： modify mand [路徑 ][文件名 ] (2).程序文件的執(zhí)行：在命令窗口輸入 do 文件名，回車。 一、程序文件的建立： 方式一： (1) 在項(xiàng)目管理器中依次展開“全部” → “代碼”，選中“程序”，單擊右側(cè)的“新建”按鈕。但這種工作方式不能完全滿足我們的工作需要，有時(shí)，我們需要系統(tǒng)能自動(dòng)、批量地完成一系列命令。它可由若干個(gè)子程序組成。在 VFP中是指一組 Visual FoxPro 程序、表單、菜單和其他文件經(jīng)項(xiàng)目管理器連編后形成的單個(gè)程序，不能脫離VFP環(huán)境運(yùn)行，擴(kuò)展名為 .APP。在 VFP中是指由項(xiàng)目管理器連編生成的、可脫離 VFP環(huán)境運(yùn)行的程序。 目標(biāo)程序： 是源程序經(jīng)過編譯后所產(chǎn)生的機(jī)器語(yǔ)言程序。 子程序： 在程序中被調(diào)用的程序。 第九章 程序設(shè)計(jì) 程序的建立和執(zhí)行 程序中的常用語(yǔ)句 順序結(jié)構(gòu)程序設(shè)計(jì) 選擇結(jié)構(gòu)程序設(shè)計(jì) 循環(huán)結(jié)構(gòu)程序設(shè)計(jì) 自定義函數(shù)、過程及其調(diào)用 程序的調(diào)試 習(xí)題 9 程序的建立和執(zhí)行 . 基本概念 程 序： 為解決某一問題而設(shè)計(jì)的一系列指令。 第九章 程序設(shè)計(jì) 結(jié)構(gòu)化程序設(shè)計(jì)功能模塊（即過程、自定義函數(shù)）編制各個(gè)功能模塊，再用主程序?qū)⑺鼈兇饋韺?yīng)用程序分解成若干功能模塊，通過各模塊的相互調(diào)用來完成整個(gè)執(zhí)行過程，是過程驅(qū)動(dòng)的。面向?qū)ο蟪绦蛟O(shè)計(jì)類、對(duì)象、屬性、事件、方法設(shè)計(jì)類、子類、對(duì)象（設(shè)計(jì)外觀、設(shè)置屬性、為事件編寫方法程序）將應(yīng)用程序分解成具有特定屬性的對(duì)象，通過調(diào)用各對(duì)象的不同方法來完成相關(guān)事件，是事件驅(qū)動(dòng)的 。 主程序： 通常被用戶直接執(zhí)行的程序。 源程序： 由人用源語(yǔ)言編寫的計(jì)算機(jī)程序，必須翻譯成機(jī)器語(yǔ)言后才能被執(zhí)行。 可執(zhí)行程序： 源程序被編譯后產(chǎn)生的可被機(jī)器直接執(zhí)行的程序，具有 .EXE 擴(kuò)展名。 應(yīng)用程序： 指為完成專門工作而設(shè)計(jì)的一組相互聯(lián)系的例行程序和子程序。 例行程序： 按某種順序排列的、使計(jì)算機(jī)能執(zhí)行某種任務(wù)的指令集合，可以是一種專用的程序或作為程序的一部分。 程序的建立和執(zhí)行 程序的建立和執(zhí)行 此前我們學(xué)習(xí)的命令，都是在交互狀態(tài)下，輸入一條命令即回車，馬上即可見到結(jié)果。在vfp中，這一功能可通過程序文件來完成。如圖 91所示。 三 .說明： 程序文件的擴(kuò)展名為 .prg，使用命令創(chuàng)建和運(yùn)行程序文件時(shí)，使用文件主名即可，擴(kuò)展名系統(tǒng)自動(dòng)會(huì)加上。 圖 92使用命令編制程序文件 ，按 ctrl+w保存 圖 92使用命令編制程序件 do abc命令運(yùn)行程序文件 ，會(huì)出現(xiàn)一個(gè)對(duì)話框，我們點(diǎn)了對(duì)話框中的“確定”后，系統(tǒng)就自動(dòng)退出了，為什么會(huì)這樣呢 ?程序文件執(zhí)行時(shí)，會(huì)批量、依次執(zhí)行文件中的命令 .執(zhí)行第 1個(gè)消息框函數(shù)，程序進(jìn)入暫停，等待用戶選擇。后面的章節(jié)將對(duì)其分別介紹。 1個(gè)問號(hào)為換行輸出， 2個(gè)問號(hào)為不換行輸出 【 例 】 編制 1個(gè)命令文件 ，保存到 f:\myvfp中，統(tǒng)計(jì)“教師工資表”中的獎(jiǎng)金和工資總額。 圖 93教師獎(jiǎng)金工資統(tǒng)計(jì)結(jié)果 程序中的常用語(yǔ)句 二 .注釋語(yǔ)句： 格式： amp。注釋內(nèi)容 功能： 為程序中的語(yǔ)句作注釋，注釋內(nèi)容不會(huì)執(zhí)行。 【 例 】 :編寫命令文件 ，輸入 1個(gè)人名，在“學(xué)生情況表”中查詢?cè)搶W(xué)生的基本信息。amp。 圖 94查詢學(xué)生的基本信息顯示 程序中的常用語(yǔ)句 四、輸入表達(dá)式語(yǔ)句 : 格式： input 表達(dá)式 to 內(nèi)存變量 說明： (1).該命令功能比 accept強(qiáng)， accept只能輸入字符型數(shù)據(jù)；而 input可輸入字符型、數(shù)值型、邏輯型和日期型。 【 例 】 :編寫程序文件 ，輸入 1個(gè)工資，查詢工資為此數(shù)值的有多少人。 六 .交互狀態(tài)控制： 格式： set talk off/on 說明： 該命令規(guī)定是否將命令執(zhí)行結(jié)果顯示在屏幕上。一般，我們?cè)诔绦蛭募拈_頭都加上該語(yǔ)句，抑制顯示中間結(jié)果。 例：在命令窗口輸入如下命令回車： wait window “請(qǐng)等待 …”AT SROW()/2 ， (SCOLS()LEN(M))/2 在屏幕中央出現(xiàn)提示窗口，利用 wait clear命令可將該窗口消除。 八 .返回語(yǔ)句： 格式： return 功能： 返回調(diào)用處或命令窗口。 順序結(jié)構(gòu)程序設(shè)計(jì) 在順序結(jié)構(gòu)中，各種操作塊按照出現(xiàn)的先后次序依次執(zhí)行。 一般格式是： STORE 表達(dá)式 TO 變量名表 或 變量名 =表達(dá)式 說明： （ 1）表達(dá)式可以是算術(shù)表達(dá)式、字符串表達(dá)式、日期表達(dá)式、關(guān)系表達(dá)式或邏輯表達(dá)式。例如： STORE 5 TO X， Y， ZA=10 （ 3）內(nèi)存變量的類型由表達(dá)式的類型決定。 程序的注釋 （ 1）行首注釋 NOTE [注釋內(nèi)容 ] 或 * [注釋內(nèi)容 ]注釋內(nèi)容可以是任何文字，程序不執(zhí)行以NOTE或 *開頭的語(yǔ)句，只起給程序說明的作用。amp。 順序結(jié)構(gòu)程序設(shè)計(jì) 程序暫停語(yǔ)句 WAIT [提示信息 ] [TO 內(nèi)存變量 ] [WINDOWS [AT 行 ,列]][TIMEOUT n]。若省略，則顯示系統(tǒng)默認(rèn)信息“請(qǐng)按任意鍵繼續(xù) ...”。 （ 3） WINDOWS [AT 行，列 ]指定顯示信息的窗口在屏幕上的位置。 （ 4） TIMEOUT n 指定在自動(dòng)等待鍵盤或鼠標(biāo)輸入的秒數(shù)，必須放在語(yǔ)句最后。 程序結(jié)束語(yǔ)句 RELEASE 語(yǔ)句的格式： RELEASE THISFORM RELEASE方法的格式為： 作用終止表單運(yùn)行。 程序文件內(nèi)容： set talk off clear input “請(qǐng)輸入圓的半徑：” to r s=*r*r ?“圓的面積是：”， s return 說明 :執(zhí)行程序時(shí)，屏幕上顯示提示信息 :請(qǐng)輸入圓的半徑。 運(yùn)行情況如圖 96所示。實(shí)際應(yīng)用中選擇結(jié)構(gòu)就是對(duì)指定的條件進(jìn)行判斷，如果條件成立，則執(zhí)行指定的語(yǔ)句序列。 選擇結(jié)構(gòu)程序設(shè)計(jì) 、單條件選擇語(yǔ)句 IF 雙分支結(jié)構(gòu)格式一： IF 條件 語(yǔ)句序列 ENDIF 執(zhí)行過程是：如果所給定的條件為真，則執(zhí)行“語(yǔ)句序列”，否則執(zhí)行 ENDIF之后的語(yǔ)句。 格式二： IF 條件 語(yǔ)句序列 AELSE 語(yǔ)句序列 BENDIF 執(zhí)行過程是：如果所給定的條件為真，則執(zhí)行“語(yǔ)句序列 1”，否則執(zhí)行“語(yǔ)句序列 2”。 說明： （ 1）語(yǔ)句序列又可以是 IF結(jié)構(gòu)，稱為 IF語(yǔ)句的嵌套。 圖 97 單條件選擇結(jié)構(gòu) 圖 98 單條件選擇結(jié)構(gòu) 條件 語(yǔ)句序列 T F 條件 A序列 B序列 T F 選擇結(jié)構(gòu)程序設(shè)計(jì) 【 例 】 :設(shè)計(jì) 1個(gè)名為 ，希望當(dāng)待人不存在時(shí)有信息提示。 圖 99無查詢結(jié)果顯示 說明 :程序執(zhí)行時(shí)，執(zhí)行 locate命令時(shí)，記錄指針從表的首記錄一直找到最后 1條記錄都未發(fā)現(xiàn)該姓名記錄時(shí)，記錄指針才最后停在文件尾，此時(shí) eof()為真值；相反，若 eof()取假值，則表示記錄指針停在待查人的記錄上。也可用 found()來代替程序中的 .()。其語(yǔ)法結(jié)構(gòu)為： IIF（條件，表達(dá)式 1，表達(dá)式 2） 說明：（ 1）當(dāng)條件為真時(shí)，函數(shù)返回表達(dá)式 1的值。 （ 3） Y=IIF（條件，表達(dá)式 1，表達(dá)式 2）相當(dāng)于： IF 條件 Y=表達(dá)式 1ELSE Y=表達(dá)式 2ENDIF。 DO CASE和ENDCASE必須成對(duì)出現(xiàn)。若條件 N成立，就執(zhí)行相應(yīng)的語(yǔ)句序列 N，直到遇到下一個(gè) CASE或 OTHERWISE或 ENDCASE。因此，在一個(gè) CASE結(jié)構(gòu)中，一次只執(zhí)行一個(gè)語(yǔ)句序列。 選擇結(jié)構(gòu)程序設(shè)計(jì) 【 例 】 :設(shè)計(jì) 1個(gè)程序名為 ，使用 do case語(yǔ)句在“學(xué)生情況表”中按學(xué)號(hào)或姓名查詢程序文件內(nèi)容： clear use 學(xué)生情況表 wait “請(qǐng)選擇按姓名或按學(xué)號(hào)查詢 (M/X)” to xz do case case xz$“Mm” amp。此條件為真，說明選擇了 M，即按姓名查詢 accept “請(qǐng)輸入待查人姓名：” to xm locate for 姓名 =xm caxe xz$“Xx” accept “請(qǐng)輸入待查學(xué)號(hào)：” to xh locate for 學(xué)號(hào) =xh otherwise wait “查詢選擇錯(cuò)誤 !按任意鍵退出 !” wind endcase display use return 運(yùn)行結(jié)果如圖 910，圖 911，圖 912所示 選擇結(jié)構(gòu)程序設(shè)計(jì) 圖 910按姓名查詢結(jié)果顯示 圖 911按學(xué)號(hào)查詢結(jié)果顯示 圖 912查詢選擇出錯(cuò)顯示 循環(huán)結(jié)構(gòu)程序設(shè)計(jì) 前面我們學(xué)習(xí)的順序結(jié)構(gòu)和選擇結(jié)構(gòu)有一個(gè)共同點(diǎn)，即程序語(yǔ)句不能重復(fù)執(zhí)行。程序設(shè)計(jì)中的循環(huán)結(jié)構(gòu)（簡(jiǎn)稱循環(huán)）是指在該程序中，從某處開始有規(guī)律地反復(fù)執(zhí)行某一操作（或程序塊）的現(xiàn)象。當(dāng)然，無論何種類型的循環(huán)，其共同特點(diǎn)是必須確保循環(huán)的重復(fù)執(zhí)行能被終止（無死循環(huán)）。由于“直到型”循環(huán)是“當(dāng)型”循環(huán)派生出來的循環(huán)形式，二者可以互換，所以在 VFP中只提供了“當(dāng)型”和“步長(zhǎng)型”和“表掃描型”三種循環(huán)語(yǔ)句： DO WHILE……ENDDO（當(dāng)型）、 FOR ……RNDFOR （步長(zhǎng)型）、SCAN……ENDSCAN （表掃描型）。根據(jù) 條件 的邏輯值進(jìn)行判斷，若 條件 為真，則執(zhí)行 DO WHILE與 ENDDO之間的循環(huán)體。每執(zhí)行一次