【正文】 表單工 ?具欄顯示 設(shè)置 TAB?順序 顯示數(shù)據(jù)環(huán) ?境 顯示屬性對 ?話框 代碼窗口 表單控件工 ?具欄 調(diào)色板工具 ?欄 布局工具欄 ? 表單生成器 ? 自動格式 （ 2） 使用顯示菜 ?單 管理系統(tǒng)中 ?計算機(jī)應(yīng)用 ?實(shí)踐環(huán)節(jié)輔 ?導(dǎo) Zheng?Hsian?g 第 20 頁 共 50 頁 （ 3） 鼠標(biāo)右鍵點(diǎn) ?擊表單 3） 添加數(shù)據(jù)環(huán) ?境 ， 鼠標(biāo)右鍵點(diǎn) ?擊表單 ， 在彈出的菜 ?單中選擇 “ 數(shù)據(jù)環(huán)境 ” ， 添加相應(yīng)的 ?數(shù)據(jù)表 ， 注意 ， 因為設(shè)計數(shù) ?據(jù)的添加刪 ?除 ， 所以數(shù)據(jù)表 ?應(yīng)該使用獨(dú) ?占方式打開 ?。 Exclu?sive 設(shè)置為 .T. 管理系統(tǒng)中 ?計算機(jī)應(yīng)用 ?實(shí)踐環(huán)節(jié)輔 ?導(dǎo) Zheng?Hsian?g 第 22 頁 共 50 頁 方法二： 先在表單上 ?添加一個表 ?格控件 ， 鼠標(biāo)右鍵點(diǎn) ?擊控件 ， 在出現(xiàn)的菜 ?單中選擇生 ?成器 ， 然后做相應(yīng) ?的設(shè)計 拖動數(shù)據(jù)表 ?的標(biāo)題到表 ?單上 ， 就可以在表 ?單上添加相 ?應(yīng)的表格控 ?件。） 9） ??MYFOR?M12 設(shè)計 ?， 設(shè)計結(jié)果如 ?圖顯示，在左側(cè)“ 列表框 ” （ 組合框 ） 選擇營業(yè)員 ?編號 ， 右邊顯示相 ?應(yīng)的記錄 。 具體設(shè)計領(lǐng) ?省管理系統(tǒng)中 ?計算機(jī)應(yīng)用 ?實(shí)踐環(huán)節(jié)輔 ?導(dǎo) Zheng?Hsian?g 第 27 頁 共 50 頁 略 。 （ 2） sno 為字 ?段名 ， 根據(jù)實(shí)際的 ?數(shù)據(jù)表實(shí)際 ?字段名做相 ?應(yīng)的修改 （ 3） 如果查詢的 ?條 件只有一 ?個 ， 表單頁可以 ?設(shè)計成如下 ?樣子：（ MYFOR?） 這時 ， 查詢語句應(yīng) ?該寫在 TE?XT1 控件 ?的 LOST?FOCUS?事件中 （ 4） 若查詢涉及 ?多個表格 ， 如 “ 輸入業(yè)務(wù)員 ?代碼和日期 ?查詢商品基 ?本情況表單 ?” ， 這是比較難 ?的設(shè)計 ， 你可以有三 ?種選擇： 1） 選擇放棄 ， 做一個簡單 ?的類似的替 ?代。 然后選擇完 ?成，保存視圖。 如果 TEX?T2 控件沒 ?有設(shè)計成日 ?期格式 ， 則以上命令 ?要改成如下 ?格式 set filte?r to (dno = alltr?im(thisf??.value?) and。 from 商品基本情 ?況表 ,業(yè)務(wù)員銷售 ?記錄表 。 INTO TABLE? RESUL?T THISF??.RECOR?DSOUR?CE = RESUL?T THISF??SH 八、 數(shù)據(jù)統(tǒng)計表 ?單設(shè)計 數(shù)據(jù)統(tǒng)計是 ?根據(jù)用戶輸 ?入的統(tǒng)計條 ?件 ， 顯示滿足條 ?件的的記錄 ?相關(guān)統(tǒng)計結(jié) ?果。 管理系統(tǒng)中 ?計算機(jī)應(yīng)用 ?實(shí)踐環(huán)節(jié)輔 ?導(dǎo) Zheng?Hsian?g 第 38 頁 共 50 頁 十一、上交 退出 VFP?將 F:盤的整個 K?S 文件拷貝 ?到 A:盤，在 A:盤標(biāo)簽上寫 ?上自己的信 ?息。 按要求建立 ?上述 2個庫 ?表， 并建立表間 ?關(guān)聯(lián) ； 在旅游銷售 ?表設(shè)計器中 ?， 設(shè)置人數(shù)必 ?須在 1人到 ?100人之 ?間 ， 否則 ， 顯示 “ 人數(shù)輸入有 ?誤 ” ， 字段的默認(rèn) ?值為 2人； 設(shè)置參照完 ?整性 :字段名 字段類型 字段寬度 小數(shù)位數(shù) 訂單號 字符型 6 線路 字符型 6 報價 整型 4 人數(shù) 數(shù)值型 3 招商卡 邏輯型 1 主題類型 字符型 4 總價 數(shù)值型 5 管理系統(tǒng)中 ?計算機(jī)應(yīng)用 ?實(shí)踐環(huán)節(jié)輔 ?導(dǎo) Zheng?Hsian?g 第 40 頁 共 50 頁 如果旅游線 ?路表中沒有 ?此旅游線路 ?,則不能組團(tuán) ?參 加該線路 ?旅游 ， 即旅游銷售 ?表中將不能 ?有該線路記 ?錄。 （ 15分） 在 【 修改 】 頁面 ： 通過輸入訂 ?單號實(shí)現(xiàn)對 ?“ 旅游銷售表 ?” 相關(guān)數(shù)據(jù)的 ?修改及刪除 ?。 查詢及輸出 ?結(jié)果均在各 ?自表中進(jìn)行 ?。（ 5分） 9． 點(diǎn)擊菜單 [退出 ]時 ， 返回系統(tǒng)菜 ?單，關(guān)閉所有 V?FP程 序及 ?數(shù)據(jù)。ROWSO?URCET?YPE=1 CHECK?1的 VAL?UE=.F. COMMA?ND1的 C?APTIO?N=確定 COMMA?ND2的 C?APTIO?N=退出 圖示： 管理系統(tǒng)中 ?計算機(jī)應(yīng)用 ?實(shí)踐環(huán)節(jié)輔 ?導(dǎo) Zheng?Hsian?g 第 45 頁 共 50 頁 ○ TEXT4?的 LOST?FOCUS?事件 : IF??THISF???=.T. THISF??.VALUE?=THISF??.VALUE?*THISF??.VALUE?THISF?EXT4?.VALUE?*500 ELSE THISF??.VALUE?=THISF??.VALUE?*THISF??.VALUE? ENDIF? ○確定按鈕 C?LICK 事 ?件 APPE BLAN REPL 訂單號 WITH ALLT(THISF??.VALUE?) REPL 線路 WITH ALLT(THISF??.VALUE?) REPL 主題類型 WITH ALLT(THISF???) REPL 報價 WITH THISF??.VALUE? REPL 招商卡 WITH THISF??? REPL 人數(shù) WITH THISF??.VALUE? REPL 總價 WITH THISF??.VALUE? THISF??.VALUE?= THISF??.VALUE?= THISF???= THISF??.VALUE?=0 THISF???=.F. THISF??.VALUE?=0 THISF??.VALUE?=0 ○ 退出按鈕的 ?CLICK?事件 THISF??SE 修改表單 ： 項目管理器 ?→ [文檔 ] → [表單 ] → [新建 ] → [新建表單 ]， 最后存名為 ?MYFOR?M12 屬性： 數(shù)據(jù)環(huán)境中 ?的 ” 旅游銷售表 ?” 的 EXCL?USIVE?=.T. FORM的 ?CAPTI?ON＝修改 TEXT1?的 INPU?TMASK?=BJ999?9 TEXT2?的 CONT?ROLSO?URCE=旅游銷售表 ?.線路 TEXT3?的 INPU?TMASK?=99999?。READO?NLY=.T.。 CONTR?OLSOU?RCE=旅游銷售表 ?.招商卡 COMMA?ND1的 C?APTIO?N=修改 COMMA?ND2的 C?APTIO?N=刪除 COMMA?ND3的 C?APTIO?N=退出 管理系統(tǒng)中 ?計算機(jī)應(yīng)用 ?實(shí)踐環(huán)節(jié)輔 ?導(dǎo) Zheng?Hsian?g 第 46 頁 共 50 頁 圖示 : ○ FORM1?的 INIT?事件 : USE 旅游銷售表 ? EXCL ○ FORM1?的 DEST?ROY事件 ?: PACK USE ○ TEXT1?的 LOST?FOCUS?事件 : LOCA FOR 訂單號 =ALLT(THISF??.VALUE?) IF EOF() MESSA?GEBOX?(沒有此訂單 ?,請重新輸入 ?！ ,64,提示 ) THISF??.VALUE?= THISF??.SETFO?CUS ENDIF? THISF??SH ○ TEXT4?的 LOST?FOCUS?事件 : IF??THISF???=.T. THISF??.VALUE?=THISF??.VALUE?*THISF??.VALUE?THISF?EXT4?.VALUE?*500 ELSE THISF??.VALUE?=THISF??.VALUE?*THISF??.VALUE? ENDIF? ○修改按鈕 C?LICK 事 ?件 THISF??.SETFO?CUS ○刪除按鈕 C?LICK 事 ?件 XZ=MESSA?GEBOX?(確定要刪除 ?嗎？ ,1+64,提示 ) IF XZ=1 DELE ELSE THISF??.SETFO?CUS 管理系統(tǒng)中 ?計算機(jī)應(yīng)用 ?實(shí)踐環(huán)節(jié)輔 ?導(dǎo) Zheng?Hsian?g 第 47 頁 共 50 頁 ENDIF? THISF??.VALUE?= THISF??.VALUE?= THISF??.VALUE?=0 THISF??.VALUE?=0 THISF??.VALUE?=0 THISF???= THISF???=.F. ○ 退出按鈕的 ?CLICK?事件 THISF??SE 五 、 綜合查詢表 ?單 圖示 : 屬性 : FORM 的 ?CAPTI?ON=綜合查詢 COMMA?ND1 的 C?APTIO?N=退出 LABEL?1 的 CAP?TION=按團(tuán)隊等級 ?查詢相關(guān)線 ?路信息 COMBO?1 的 ROW?SOURC?E=豪華團(tuán) ,經(jīng)濟(jì)團(tuán) ,舒適團(tuán) COMBO?1 的 ROW?SOURC?ETYPE?=1 ○ COMBO?1 的 INT?ERACT?IVECH?ANGE事 ?件 : SELE 線路 ,出發(fā)日期 ,團(tuán)隊等級 ,交通 FROM 旅游線路表 ? WHERE? 團(tuán)隊等級 =THISF?