【正文】 VFP程序 —— 命令文件的建立和執(zhí)行 VFP常用編程命令及函數(shù) VFP流程圖介紹 順序執(zhí)行 判斷分支 循環(huán)結(jié)構(gòu) 過程與用戶自定義函數(shù) 第五章 Visual FoxPro程序設(shè)計(jì)入門 VFP程序 —— 命令文件的建立和執(zhí)行 建立和編輯命令文件 1． 用 MODIFY COMMAND命令建立命令文件 命令格式 ： MODIFY COMMAND [文件名 ] 命令功能 ：打開命令文件編輯窗口創(chuàng)建 /編輯指定命令文件 。 說(shuō)明 ： ?文件名的默認(rèn)擴(kuò)展名為 .PRG。 ?指定文件存在時(shí) ， 首先在磁盤上復(fù)制一同名 、 同內(nèi)容的 .BAK文件 。 ?編輯結(jié)束時(shí) ， 可用 ^End或 ^W結(jié)束命令并存盤 。 也可用 Esc鍵作廢編輯并結(jié)束命令 。 2． 使用菜單操作建立命令文件 操作過程：文件 → 新建 → 選擇 “ 程序 ” 單選按鈕 → 單擊“ 新建文件 ” ， 將打開一編輯窗口 ， 供用戶輸入程序 。 3． 使用項(xiàng)目管理器建立命令文件 有關(guān)項(xiàng)目管理器的詳細(xì)內(nèi)容參見第十三章 。 操作過程：首先打開項(xiàng)目管理器 → 選擇 “ 代碼 ” 選項(xiàng)卡→ 選擇 “ 程序 ” 選項(xiàng) → 單擊 “ 新建 ” 按鈕 ， 也將打開一編輯窗口供用戶輸入程序 。 執(zhí)行命令文件 命令基本格式 ： DO 命令文件名 命令功能 ：首先打開指定的命令文件 ， 然后從其第一條語(yǔ)句開始執(zhí)行 。 執(zhí)行完畢 ， 自動(dòng)關(guān)閉該命令文件 。 VFP常用編程命令及函數(shù) 1． SET TALK命令 命令格式： SET TALK ON/OFF 命令功能：使命令結(jié)果顯示 /不顯示 。 VFP常用編程命令及函數(shù) 1． 系統(tǒng)初始化命令 —— CLEAR ALL 命令格式 ： CLEAR ALL 命令功能： 關(guān)閉所有打開的庫(kù)文件 、 表文件及其相關(guān)文件 ——索引文件 、 備注文件等 ， 清除所有內(nèi)存變量 ， 清除所有用戶自定義下拉菜單 、 彈出式菜單和窗口 ， 選擇1號(hào)工作區(qū)為當(dāng)前工作區(qū) 。 2． 清屏命令 —— CLEAR 命令格式 ： CLEAR 命令功能 ：清除 VFP主窗口或當(dāng)前用戶自定義窗口 。 3． 終止程序執(zhí)行語(yǔ)句 —— CANCEL 命令格式 ： CANCEL 命令功能： 終 止 正 在 執(zhí) 行 的 程 序 ， 把 控 制 權(quán) 返 回 給COMMAND窗口 。 4. 程序注釋語(yǔ)句 —— NOTE/* 命令格式 1： NOTE注釋字符 命令格式 2： * 注釋字符 命令功能： 標(biāo)識(shí)一個(gè)非執(zhí)行的注釋行 。 VFP流程圖介紹 在編制程序尤其是編制復(fù)雜程序時(shí) ， 常用流程圖來(lái)進(jìn)行程序設(shè)計(jì)和介紹程序的結(jié)構(gòu) 。 流程圖是形象的描述程序設(shè)計(jì)思想的好方法 ， 它的特點(diǎn)是比較直觀 、 清晰 。 順 序 執(zhí) 行 順序執(zhí)行程序 順序執(zhí)行程序特點(diǎn)：命令的執(zhí)行順序就是命令在程序中的排列順序 ， 每條命令均被執(zhí)行一次 。 例 1 根據(jù)圓的半徑計(jì)算圓的面積 。 程序清單 : Clear Input‘請(qǐng)輸入半徑： ’ to r ? ?圓的面積為 :’ ,pi()*r*r 判 斷 分 支 條件轉(zhuǎn)向語(yǔ)句 —— IF… ENDIF 這是一種簡(jiǎn)單的分支語(yǔ)句 ， 語(yǔ)句格式如下： IF條件表達(dá)式 命令序列 ENDIF 條件表達(dá)式 值為 “ 真 ” 時(shí) ， 順序執(zhí)行 IF和 ENDIF間的語(yǔ)句行序列 ， 然后再執(zhí)行 ENDIF后的語(yǔ)句；若其值為 “ 假 ”時(shí) ， 則直接跳到 ENDIF后面的語(yǔ)句繼續(xù)執(zhí)行 。 IF和 ENDIF必須成對(duì)出現(xiàn) 。 圖 5?–?4 條件轉(zhuǎn)向語(yǔ)句流程圖 條件表達(dá)式 為 .T . 為 .F . 語(yǔ)句行序列 EN DIF 語(yǔ)句 例 2 讀程序清單 ,分析程序功能 . Clear Input‘請(qǐng)輸入一個(gè)隨機(jī)正整數(shù) :’ to n If mod(n,7)=0 ? ?Pass!‘ Endif 條件選擇轉(zhuǎn)向語(yǔ)句 —— IF… ELSE… ENDIF 語(yǔ)句格式： IF?條件表達(dá)式 命令序列 1 ELSE 命令序列 2 ENDIF 執(zhí)行過程：計(jì)算條件表達(dá)式的值 ， 若為真 ， 則執(zhí)行 命令序列1， 然后跳過 命令序列 2， 從 ENDIF后面的語(yǔ)句繼續(xù)執(zhí)行；否則 ， 執(zhí)行 命令序列 2， 然后再執(zhí)行 ENDIF后面的語(yǔ)句 。 例 3 讀程序清單 ,分析程序功能 . Clear Input‘請(qǐng)輸入一個(gè)隨機(jī)正整數(shù) :’ to n If mod(n,7)=0 ? ?Pass!‘ Else ? ?Sorry!‘ Endif IF語(yǔ)句的嵌套 例 4 為鼓勵(lì)存款，對(duì)定期存款時(shí)間少于 1年的，利率為 3%；等于或大于 1年而少于 3年的，利率為 5%；等于或大于 3年而少于5年的，利率為 7%； 5年以上的，利率為 9%。 程序清單如下： 圖 5?–?8 例 4的流程圖 定期 ＜ 5 年 ?是 否利率 ＝ 7 利率 ＝ 9利率 ＝ 5否是定期 ＜ 3 年 ?利率 ＝ 3是 否定期 ＜ 1 年 ?輸入存款年限 情況語(yǔ)句 —— DO CASE … ENDCASE 情況語(yǔ)句格式： DO CASE CASE ?條件表達(dá)式 1 語(yǔ)句行序列 1 CASE ?條件表達(dá)式 2 語(yǔ)句行序列 2 … CASE ?條件表達(dá)式 n 語(yǔ)句行序列 n [OTHERWISE 語(yǔ)句行序列 ] ENDCASE 執(zhí)行過程：依次計(jì)算每一個(gè) CASE語(yǔ)句對(duì)應(yīng)的條件表達(dá)式 ， 遇到 第一個(gè) 為真值者 ， 則執(zhí)行該語(yǔ)句下面對(duì)應(yīng)的語(yǔ)句序列段 ， 執(zhí)行完后 ， 直接跳轉(zhuǎn)至 ENDCASE后 。 如果所有的條件都不為真值 ， 若無(wú) OTHERWISE子句 ， 則不執(zhí)行任何語(yǔ)句序列 ， 跳轉(zhuǎn)至ENDCASE后；有可選項(xiàng) OTHEWISE時(shí) ， 執(zhí)行 OTHERWISE子句對(duì)應(yīng)的語(yǔ)句序列 ， 再跳轉(zhuǎn)至 ENDCASE后 。 如果有多個(gè)條件表達(dá)式為真值 ， 也僅僅執(zhí)行第一個(gè)條件表達(dá)式為真值者對(duì)應(yīng)的語(yǔ)句序列 。