1、第第12章章應(yīng)用表單的設(shè)計應(yīng)用表單的設(shè)計12.1 設(shè)計系統(tǒng)說明表單設(shè)計系統(tǒng)說明表單12.2 設(shè)計系統(tǒng)登錄表單設(shè)計系統(tǒng)登錄表單12.3 設(shè)計數(shù)據(jù)維護(hù)表單設(shè)計數(shù)據(jù)維護(hù)表單12.4 設(shè)計數(shù)據(jù)查詢表單設(shè)計數(shù)據(jù)查詢表單12.5 設(shè)計多功能表單設(shè)計多功能表單習(xí)題習(xí)題 表單是應(yīng)用系統(tǒng)的主要工作界面，也是用戶進(jìn)行應(yīng)表單是應(yīng)用系統(tǒng)的主要工作界面，也是用戶進(jìn)行應(yīng)用系統(tǒng)開發(fā)的基礎(chǔ)。在用系統(tǒng)開發(fā)的基礎(chǔ)。在Visual FoxPro系統(tǒng)中，使用系統(tǒng)中，使用表單控件進(jìn)行應(yīng)用表單的設(shè)計，會使應(yīng)用程序的界表單控件進(jìn)行應(yīng)用表單的設(shè)計，會使應(yīng)用程序的界面美觀、大方，便于操作和控制。面美觀、大方，便于操作和控制。 本章將結(jié)合應(yīng)用表

2、單的設(shè)計，進(jìn)一步介紹常用表單本章將結(jié)合應(yīng)用表單的設(shè)計，進(jìn)一步介紹常用表單控件的基本屬性的定義，及其事件和方法代碼的設(shè)控件的基本屬性的定義，及其事件和方法代碼的設(shè)計。計。12.1 設(shè)計系統(tǒng)說明表單設(shè)計系統(tǒng)說明表單 系統(tǒng)說明表單，是有關(guān)系統(tǒng)功能或系統(tǒng)設(shè)計或系統(tǒng)系統(tǒng)說明表單，是有關(guān)系統(tǒng)功能或系統(tǒng)設(shè)計或系統(tǒng)使用的說明窗口。設(shè)計者可以通過它，向使用系統(tǒng)使用的說明窗口。設(shè)計者可以通過它，向使用系統(tǒng)的用戶說明與系統(tǒng)相關(guān)的信息。的用戶說明與系統(tǒng)相關(guān)的信息。 以下三個不同的例子，都是有關(guān)系統(tǒng)說明的窗口，以下三個不同的例子，都是有關(guān)系統(tǒng)說明的窗口，這幾個系統(tǒng)說明表單各自具有不同的風(fēng)格，它們體這幾個系統(tǒng)說明表單各自

3、具有不同的風(fēng)格，它們體現(xiàn)了系統(tǒng)說明表單的一般設(shè)計形式?，F(xiàn)了系統(tǒng)說明表單的一般設(shè)計形式。 例例12.1 設(shè)計一個表單，其名定義名設(shè)計一個表單，其名定義名“關(guān)于系統(tǒng)關(guān)于系統(tǒng)1”，運行運行“關(guān)于系統(tǒng)關(guān)于系統(tǒng)1”的結(jié)果如圖的結(jié)果如圖12.1所示。所示。圖圖12.1 “關(guān)于系統(tǒng)關(guān)于系統(tǒng)1”表單，含有表單，含有3個標(biāo)簽控件。個標(biāo)簽控件。 其中：其中：(1) 表單的主要屬性如下：表單的主要屬性如下： Caption：關(guān)于系統(tǒng)：關(guān)于系統(tǒng) Top：0 Left：0 Height：454 Width：642 backcolor：255，255，0 Fontname：宋體：宋體 Fontsize：9 Windows

4、tate：2 - 最大化最大化 Name：form1(2) 標(biāo)簽標(biāo)簽1的主要屬性如下：的主要屬性如下： Caption：鐵路售票查詢系統(tǒng)：鐵路售票查詢系統(tǒng) V1.0 Top：72 Left：80 Height：56 Width：520 Autosize：.T. - 真真 Fontname：仿宋：仿宋 - GB2312 Fontsize：35 Windowstate：2 - 最大化最大化 backcolor：0 - 透明透明 Name：Label1(3) 標(biāo)簽標(biāo)簽2的主要屬性如下：的主要屬性如下： Caption：版權(quán)所有：版權(quán)所有(C)2000 Top：192 Left：220 Height：

5、24 Width：184 Fontname：楷體：楷體 - GB2312 Fontsize：14 Name：Label2其他屬性與其他屬性與Label1相同。相同。(4) 標(biāo)簽標(biāo)簽3的主要屬性如下：的主要屬性如下： Caption：研制人：楊小禮李雁翎：研制人：楊小禮李雁翎 Top：241 Left：200 Height：29 Width：266 Fontname：楷體：楷體GB2312 Fontsize：18 Name：Label3其他屬性與其他屬性與Label1相同。相同。 例例12.2 設(shè)計一個表單，其名定義為設(shè)計一個表單，其名定義為“關(guān)于系統(tǒng)關(guān)于系統(tǒng)2”。運行運行“關(guān)于系統(tǒng)關(guān)于系統(tǒng)2”

6、的結(jié)果如圖的結(jié)果如圖12.2所示。所示。圖圖12.2 “關(guān)于系統(tǒng)關(guān)于系統(tǒng)2”表單，含有表單，含有3個標(biāo)簽控件，個標(biāo)簽控件，1個命令按個命令按鈕控件，鈕控件，1個圖像控件。個圖像控件。 其中：其中：(1) 表單的主要屬性如下：表單的主要屬性如下： Caption：關(guān)于系統(tǒng)：關(guān)于系統(tǒng) Top：0 Left：0 Height：253 Width：394 Fontname：宋體：宋體 Fontsize：9 backcolor：192，192，192 Autocenter：.T. 真真 Name：form1(2) 標(biāo)簽標(biāo)簽1的主要屬性如下：的主要屬性如下： Caption：旅游信息管理系統(tǒng)：旅游信息管理

7、系統(tǒng) Top：60 Left：192 Height：253 Width：168 Fontname：宋體：宋體 Fontsize：15 backcolor：0 透明透明 Name：Label1(3) 標(biāo)簽標(biāo)簽2的主要屬性如下：的主要屬性如下： Caption：Version1.0 Top：120 Left：216 Height：14 Width：120 Fontsize：9 Name：Label2其他屬性與其他屬性與Label1相同。相同。(4) 標(biāo)簽標(biāo)簽3的主要屬性如下：的主要屬性如下： Caption：Copyright2000 Top：215 Left：17 Height：25 Width

8、：220 Fontname：幼園：幼園 Fontsize：11 Name：Label3 其他屬性與其他屬性與Label1相同。相同。(5) 圖像圖像1的主要屬性如下：的主要屬性如下： Top：11 Left：11 Height：157 Width：145 Stretch：2 變比填充變比填充 Picture：c:lylj4.bmp Name：Image1 (6) 命令按鈕命令按鈕1的主要屬性如下：的主要屬性如下： Caption：確認(rèn)：確認(rèn) Top：216 Left：265 Height：25 Width：100 Name：Command1(7) Command1的的Click事件代碼如下：事

9、件代碼如下：release thisform 例例12.3 設(shè)計一個表單，其名定義為設(shè)計一個表單，其名定義為“關(guān)于系統(tǒng)關(guān)于系統(tǒng)3”。運行運行“關(guān)于系統(tǒng)關(guān)于系統(tǒng)3”的結(jié)果如圖的結(jié)果如圖12.3所示。所示。圖圖12.3 “關(guān)于系統(tǒng)關(guān)于系統(tǒng)3”表單，含有表單，含有6個標(biāo)簽控件。個標(biāo)簽控件。 其中：其中：(1) 表單的主要屬性如下：表單的主要屬性如下： Caption：系統(tǒng)幫助：系統(tǒng)幫助 Top：13 Left：19 Height：234 Width：519 Fontname：宋體：宋體 Fontsize：9 Picture：c:lyl0252.jpg Name：form1(2) 標(biāo)簽標(biāo)簽1的主要屬性

10、如下：的主要屬性如下： Caption：熟識本系統(tǒng)應(yīng)注意以下幾點：熟識本系統(tǒng)應(yīng)注意以下幾點： Top：21 Left：19 Height：24 Width：263 Fontname：黑體：黑體 Fontsize：14 Fontunderline：.T.真真 backcolor：0 透明透明 Name：Label1(3) 標(biāo)簽標(biāo)簽2的主要屬性如下：的主要屬性如下： Caption：1.運行時請不要同時打開過多的窗口！運行時請不要同時打開過多的窗口！ Top：60 Left：96 Height：20 Width：293 Fontname：楷體：楷體GB2312 Fontsize：12 Name：L

11、abel2其他屬性與其他屬性與Label1相同。相同。(4) 標(biāo)簽標(biāo)簽3的主要屬性如下：的主要屬性如下： Caption：2.請注意多個控件的配合使用！請注意多個控件的配合使用！ Top：87 Width：242 Name：Label3 其他屬性與其他屬性與Label2相同。相同。(5) 標(biāo)簽標(biāo)簽4的主要屬性如下：的主要屬性如下： Caption：3.請注意登陸密碼的準(zhǔn)確輸入！請注意登陸密碼的準(zhǔn)確輸入！ Top：112 Width：242 Name：Label4 其他屬性與其他屬性與Label2相同。相同。(6) 標(biāo)簽標(biāo)簽5的主要屬性如下：的主要屬性如下： Caption：4.請謹(jǐn)慎運行刪除表

12、單！請謹(jǐn)慎運行刪除表單！ Top：141 Width：191 Name：Label5 其他屬性與其他屬性與Label2相同。相同。(7) 標(biāo)簽標(biāo)簽6的主要屬性如下：的主要屬性如下： Caption：歡迎使用鐵路售票查詢管理系統(tǒng)?。簹g迎使用鐵路售票查詢管理系統(tǒng)！ Top：192 Left：204 Height：20 Width：258 Fontname：楷體：楷體GB2312 Fontsize：12 Fontunderline：.T.真真 backcolor：0 透明透明 Name：Label612.2 設(shè)計系統(tǒng)登錄表單設(shè)計系統(tǒng)登錄表單 系統(tǒng)登錄表單，是用戶使用系統(tǒng)的第一個工作窗口。系統(tǒng)登錄表單

13、，是用戶使用系統(tǒng)的第一個工作窗口。系統(tǒng)登錄表單應(yīng)該是具有啟動系統(tǒng)，驗證操作員系統(tǒng)登錄表單應(yīng)該是具有啟動系統(tǒng)，驗證操作員“口令口令”，引導(dǎo)用戶使用系統(tǒng)等功能的工作窗口。，引導(dǎo)用戶使用系統(tǒng)等功能的工作窗口。 以下介紹兩個不同的系統(tǒng)登錄表單的設(shè)計。以下介紹兩個不同的系統(tǒng)登錄表單的設(shè)計。 例例12.4 設(shè)計一個表單，其名定義為設(shè)計一個表單，其名定義為“系統(tǒng)登錄系統(tǒng)登錄1”。運行運行“系統(tǒng)登錄系統(tǒng)登錄1”的結(jié)果如圖的結(jié)果如圖12.4所示。所示。圖圖12.4 “系統(tǒng)登錄系統(tǒng)登錄1”表單，含有表單，含有2個標(biāo)簽控件，個標(biāo)簽控件，3個命令按個命令按鈕控件，鈕控件，1個容器控件，個容器控件，1個文本框控件，個文

14、本框控件，1個組合個組合框控件?？蚩丶?。 其中：其中：(1) 表單的主要屬性如下：表單的主要屬性如下： Caption：登錄：登錄 Top：0 Left：0 Height：162 Width：275 Fontname：宋體：宋體 Fontsize：9 backcolor：0，128，255 Autocenter：.T. 真真 Icon：c:lylkey04.ico Name：form1(2) 命令按鈕命令按鈕1的主要屬性如下：的主要屬性如下： Caption：確：確 定定 Top：121 Left：24 Height：23 Width：60 Fontname：宋體：宋體 Fontsize：9

15、Autocsize：.F.假假 Name：Command1(3) 命令按鈕命令按鈕2的主要屬性如下：的主要屬性如下： Caption：取消：取消 Left：106 Name：Command2其他屬性與其他屬性與Command1相同。相同。(4) 命令按鈕命令按鈕3的主要屬性如下：的主要屬性如下： Caption：退出：退出 Left：190 Name：Command3其他屬性與其他屬性與Command1相同。相同。(5) 標(biāo)簽標(biāo)簽1的主要屬性如下：的主要屬性如下： Caption：操作員：操作員 Top：29 Left：63 Height：36 Width：108 Fontname：楷體：楷體

16、GB2312 Fontsize：13 Backcolor：0 透明透明 Name：Label1(6) 標(biāo)簽標(biāo)簽2的主要屬性如下：的主要屬性如下： Caption：密碼：密碼 Top：71 Width：73 Name：Label2其他屬性與其他屬性與Label1相同。相同。(7) 文本框文本框1的主要屬性如下：的主要屬性如下： Top：70 Left：164 Height：24 Width：69 Passwordchar：* Fontname：宋體：宋體 Fontsize：9 Value：(無無) Name：Text1(8) 組合框組合框1的主要屬性如下：的主要屬性如下： Top：28 Left

17、：164 Height：24 Width：71 Rowsource：password.czy Rowsourcetype：6 字段字段 Name：Combo1(9) 容器容器1的主要屬性如下：的主要屬性如下： Top：12 Left：24 Height：96 Width：228 Backstyle：1 不透明不透明 Speciaieffect：1 凹下凹下 backcolor：255，128，255 Name：Container1(10) form1的的init事件代碼如下：事件代碼如下：public m(11) Command1的的Click事件代碼如下：事件代碼如下：thisform.i=

18、thisform.i+1select passwordlocate for czy=alltrim(bo1.value)if found() and mm=alltrim(thisform.text1.value)if bo1.value=XFm=1_screen.caption=旅行社管理信息系統(tǒng)旅行社管理信息系統(tǒng)-(操作員操作員 ：XF)endifif bo1.value=LZm=0_screen.caption=旅行社管理信息系統(tǒng)旅行社管理信息系統(tǒng)-(操作員操作員 ：LZ)endif_screen.windowstate=2_screen.movable=.f._screen.minbu

19、tton=.f._screen.maxbutton=.f._screen.showtips=.t._screen.mousepointer=1set classlib to toobar.vcx_screen.addobject(toobar1,toobar)_screen.toobar1.left=0_screen.toobar1.top=0_screen.toobar1.visible=.t._screen.toobar1.enabled=.t.do mmenu.mprset clock onthisform.releaseelseif thisform.i=3=messagebox(不知

20、道是操作員還是密碼搞錯了不知道是操作員還是密碼搞錯了?+chr(13)+再試一次再試一次!,48,警個告警個告)thisform.text1.setfocuselse=messagebox(對不起對不起,您已輸錯三次了您已輸錯三次了!+ chr(13)+看來你是個非法用戶看來你是個非法用戶,您請回您請回,48,嚴(yán)重警個告嚴(yán)重警個告)thisform.releaseendifendif(12) Command2的的Click事件代碼如下：事件代碼如下：release thisform(13) Command3的的Click事件代碼如下：事件代碼如下：release thisformclose a

21、llquit(14) “系統(tǒng)登錄系統(tǒng)登錄1”表單的數(shù)據(jù)環(huán)境如圖表單的數(shù)據(jù)環(huán)境如圖12.5所示。所示。圖圖12.5 例例12.5設(shè)計一個表單，其名定義為設(shè)計一個表單，其名定義為“系統(tǒng)登錄系統(tǒng)登錄2”。運行運行“系統(tǒng)登錄系統(tǒng)登錄2”的結(jié)果如圖的結(jié)果如圖12.6所示。所示。圖圖12.6 “系統(tǒng)登錄系統(tǒng)登錄2”表單，含有表單，含有5個標(biāo)簽控件，個標(biāo)簽控件，2個命令按個命令按鈕控件，鈕控件，1個形狀控件，個形狀控件，1個文本框控件，個文本框控件，1個組合個組合框控件，框控件，1個計時器控件。個計時器控件。 其中：其中：(1) 表單的主要屬性如下：表單的主要屬性如下： Caption：系統(tǒng)登錄：系統(tǒng)登錄

22、Top：0 Left：0 Height：227 Width：405 Fontname：宋體：宋體 Fontsize：9 Backcolor：192，192，192 Autocenter：.T. 真真 Name：form1(2) 命令按鈕命令按鈕1的主要屬性如下：的主要屬性如下： Caption：確認(rèn)：確認(rèn) Top：117 Left：301 Height：23 Width：72 Fontname：宋體：宋體 Fontsize：9 Autocsize：.F.假假 Name：cmdok(3) 命令按鈕命令按鈕2的主要屬性如下：的主要屬性如下： Caption：取消：取消 Top：153 Name：c

23、mdCancel其他屬性與其他屬性與cmdok相同。相同。(4) 標(biāo)簽標(biāo)簽1的主要屬性如下：的主要屬性如下： Caption：選擇操作員：選擇操作員： Name：Label1其他屬性略。其他屬性略。(5) 標(biāo)簽標(biāo)簽2的主要屬性如下：的主要屬性如下： Caption：操作員口令：操作員口令： Name：Label2其他屬性略。其他屬性略。(6) 標(biāo)簽標(biāo)簽3的主要屬性如下：的主要屬性如下： Caption：輸入操作員及口令：輸入操作員及口令 Name：Label3其他屬性略。其他屬性略。(7) 標(biāo)簽標(biāo)簽4的主要屬性如下：的主要屬性如下： Caption：歡迎使用：歡迎使用“學(xué)生檔案管理學(xué)生檔案管理

24、 V1.0” Name：Label4其他屬性略。其他屬性略。(8) 標(biāo)簽標(biāo)簽5的主要屬性如下：的主要屬性如下： Caption：學(xué)生檔案管理：學(xué)生檔案管理 V1.0 Name：Label5其他屬性略。其他屬性略。(9) 文本框文本框1的主要屬性如下：的主要屬性如下： Top：150 Left：110 Height：23 Width：178 Passwordchar：* Fontname：宋體：宋體 Fontsize：9 Value：(無無) Name：txtPassword(10) 組合框組合框1的主要屬性如下：的主要屬性如下： Top：116 Left：110 Height：25 Width

25、：178 Rowsource：sysmn.s1 Rowsourcetype：6 字段字段 Name：txtUserName(11) 形狀形狀1的主要屬性如下：的主要屬性如下： Top：104 Left：18 Height：81 Width：371 Backstyle：0 透明透明 Name：Shape1(12) 計時器計時器1的主要屬性如下：的主要屬性如下： Enabled： .T. Interval：220 Name：Timer1(13) form1的的Init事件代碼如下：事件代碼如下：public cUser(14) form1的的Load事件代碼如下：事件代碼如下：set talk o

26、ffset safety off(15) Timer1的的Timer事件代碼如下：事件代碼如下：if thisform.label4.left1thisform.label4.left=thisform.width-8elsethisform.label4.left=thisform.label4.left-2endif(16) cmdok的的Click事件代碼如下：事件代碼如下：private syspassselect sysmnsyspass=allt(thisform.txtPassword.Value)locate for allt (s1)= allt(thisform.txtUs

27、erName.Value)iffound() andallt(sysmn.s3)=syspassthisform.cUser = allt(sysmn.s1)sysna= allt(sysmn.s2)thisform.visible=.f._screen.caption= 操作員：操作員：+sysnado hy_main.mprread eventthisform.visible=.t.this.parent.txtpassword.value= else#define mismatch_loc 用戶號或口令不正確！請重用戶號或口令不正確！請重新輸入。新輸入。wait window misma

28、tch_loc timeout1thisform.txtPassword.Value = thisform.txtPassword.SetFocusendif(17) cmdCancel的的Click事件代碼如下：事件代碼如下：thisform.cUser = thisform.Release(18) “系統(tǒng)登錄系統(tǒng)登錄2”表單的數(shù)據(jù)環(huán)境如圖表單的數(shù)據(jù)環(huán)境如圖12.7所示。所示。圖圖12.712.3 設(shè)計數(shù)據(jù)維護(hù)表單設(shè)計數(shù)據(jù)維護(hù)表單 數(shù)據(jù)維護(hù)表單，是用戶進(jìn)行數(shù)據(jù)資源管理的一個工數(shù)據(jù)維護(hù)表單，是用戶進(jìn)行數(shù)據(jù)資源管理的一個工作窗口，是數(shù)據(jù)庫應(yīng)用系統(tǒng)中的重要工作環(huán)境之一。作窗口，是數(shù)據(jù)庫應(yīng)用系統(tǒng)中的

29、重要工作環(huán)境之一。數(shù)據(jù)維護(hù)表單是應(yīng)用系統(tǒng)提供給用戶的一個數(shù)據(jù)維數(shù)據(jù)維護(hù)表單是應(yīng)用系統(tǒng)提供給用戶的一個數(shù)據(jù)維護(hù)環(huán)境，它能夠完成數(shù)據(jù)的輸入、修改、增加、刪護(hù)環(huán)境，它能夠完成數(shù)據(jù)的輸入、修改、增加、刪除及瀏覽等操作功能。除及瀏覽等操作功能。 以下介紹以下介紹“數(shù)據(jù)維護(hù)數(shù)據(jù)維護(hù)”和和“數(shù)據(jù)瀏覽數(shù)據(jù)瀏覽”兩個表單設(shè)兩個表單設(shè)計實例。計實例。 例例12.6 設(shè)計一個表單，其名定義為設(shè)計一個表單，其名定義為“數(shù)據(jù)維護(hù)數(shù)據(jù)維護(hù)”。運行運行“數(shù)據(jù)維護(hù)數(shù)據(jù)維護(hù)”的結(jié)果如圖的結(jié)果如圖12.8所示。所示。圖圖12.8 “數(shù)據(jù)維護(hù)數(shù)據(jù)維護(hù)1”表單，含有表單，含有8個標(biāo)簽控件，個標(biāo)簽控件，1個命令按個命令按鈕組控件鈕組控

30、件(其中包含其中包含8個命令按鈕個命令按鈕)，1個復(fù)選框控件，個復(fù)選框控件，7個文本框控件。個文本框控件。 其中：其中：(1) 表單的主要屬性如下：表單的主要屬性如下： Caption：團(tuán)員情況：團(tuán)員情況 Top：0 Left：0 Height：299 Width：482 Fontname：宋體：宋體 Fontsize：9 Icon：c:lylmisc27.ico Backcolor：192，192，192 Autocenter：.T. 真真 Name：form1(2) 命令按鈕組的主要屬性如下：命令按鈕組的主要屬性如下： Top：241 Left：45 Height：46 Width：407

31、 Buttoncount：8 Name：Commandgroup1(3) 命令按鈕命令按鈕1的主要屬性如下：的主要屬性如下： Caption：首記錄：首記錄 Top：5 Left：5 Height：35 Width：45 Fontname：宋體：宋體 Fontsize：9 Name：Command1(4) 命令按鈕命令按鈕2的主要屬性如下：的主要屬性如下： Caption：上一條：上一條 Left：52 Name：Command2其他屬性與其他屬性與Command1相同。相同。(5) 命令按鈕命令按鈕3的主要屬性如下：的主要屬性如下： Caption：下一條：下一條 Left：101 Name

32、：Command3其他屬性與其他屬性與Command1相同。相同。(6) 命令按鈕命令按鈕4的主要屬性如下：的主要屬性如下： Caption：末記錄：末記錄 Left：150 Name：Command4其他屬性與其他屬性與Command1相同。相同。(7) 命令按鈕命令按鈕5的主要屬性如下：的主要屬性如下： Caption：增加：增加 Left：199 Name：Command5其他屬性與其他屬性與Command1相同。相同。(8) 命令按鈕命令按鈕6的主要屬性如下：的主要屬性如下： Caption：刪除：刪除 Left：250 Name：Command6其他屬性與其他屬性與Command1相

33、同。相同。(9) 命令按鈕命令按鈕7的主要屬性如下：的主要屬性如下： Caption：存盤：存盤 Left：300 Name：Command7其他屬性與其他屬性與Command1相同。相同。(10) 命令按鈕命令按鈕8的主要屬性如下：的主要屬性如下： Caption：退出：退出 Left：350 Name：Command8其他屬性與其他屬性與Command1相同。相同。(11) 復(fù)選框復(fù)選框1的主要屬性如下：的主要屬性如下： Top：192 Left：128 Height：24 Width：48 Controlsource：member.tf Value：0 Name：Check1(12) 標(biāo)

34、簽標(biāo)簽1的主要屬性如下：的主要屬性如下： Caption：團(tuán)員編號：團(tuán)員編號 Top：24 Left：41 Height：25 Width：85 Fontname：楷體：楷體 GB2312 Fontsize：13 Name：Label1(13) 標(biāo)簽標(biāo)簽2的主要屬性如下：的主要屬性如下： Caption：姓名：姓名 Top：54 Name：Label2其他屬性與其他屬性與Label1相同。相同。(14) 標(biāo)簽標(biāo)簽3的主要屬性如下：的主要屬性如下： Caption：性別：性別 Top：90 Name：Label3其他屬性與其他屬性與Label1相同。相同。(15) 標(biāo)簽標(biāo)簽4的主要屬性如下：的主

35、要屬性如下： Caption：電話：電話 Top：129 Name：Label4其他屬性與其他屬性與Label1相同。相同。(16) 標(biāo)簽標(biāo)簽5的主要屬性如下：的主要屬性如下： Caption：通訊地址：通訊地址 Top：161 Name：Label5其他屬性與其他屬性與Label1相同。相同。(17) 標(biāo)簽標(biāo)簽6的主要屬性如下：的主要屬性如下： Caption：團(tuán)費交否：團(tuán)費交否 Top：195 Name：Label6其他屬性與其他屬性與Label1相同。相同。(18) 標(biāo)簽標(biāo)簽7的主要屬性如下：的主要屬性如下： Caption：團(tuán)員編號：團(tuán)員編號 Top：24 Left：252 Name：

36、Label7其他屬性與其他屬性與Label1相同。相同。(19) 標(biāo)簽標(biāo)簽8的主要屬性如下：的主要屬性如下： Caption：身份證號碼：身份證號碼 Top：84 Left：252 Name：Label8 Width：96其他屬性與其他屬性與Label1相同。相同。(20) 文本框文本框1的主要屬性如下：的主要屬性如下： Top：20 Left：128 Height：25 Width：73 Controlsource：member.tbh Fontname：宋體：宋體 Fontsize：9 Value：(無無) Name：Text1(21) 文本框文本框2的主要屬性如下：的主要屬性如下： To

37、p：53 Controlsource：member.xm Name：Text2其他屬性與其他屬性與Text1相同。相同。(22) 文本框文本框3的主要屬性如下：的主要屬性如下： Top：89 Controlsource：member.xb Name：Text3其他屬性與其他屬性與Text1相同。相同。(23) 文本框文本框4的主要屬性如下：的主要屬性如下： Top：125 Width：100 Controlsource：member.dh Name：Text4其他屬性與其他屬性與Text1相同。相同。(24) 文本框文本框5的主要屬性如下：的主要屬性如下： Top：161 Width：264

38、Controlsource：member.dz Name：Text5其他屬性與其他屬性與Text1相同。相同。(25) 文本框文本框6的主要屬性如下：的主要屬性如下： Top：20 Left：128 Width：350 Controlsource：member.hm Name：Text6其他屬性與其他屬性與Text1相同。相同。(26) 文本框文本框7的主要屬性如下：的主要屬性如下： Top：120 Left：264 Width：168 Controlsource：member.sfz Name：Text7其他屬性與其他屬性與Text1相同。相同。(27) form1的的Init事件代碼如下：

39、事件代碼如下：go topthisform.istop=.t.thisform.isbottom=.f.(28) form1的的Cmdstaus事件代碼如下：事件代碼如下：lparameter stausif staus=1 with mandgroup1command1.enabled=mand2.enabled=mand3.enabled=mand4.enabled=mand5.enabled=mand6.enabled=mand7.enabled=mand8.enabled=.t. endwith else with mandgroup1command1.enabled=mand2.en

40、abled=mand3.enabled=mand4.enabled=mand5.enabled=mand6.enabled=mand7.enabled=mand8.enabled=.t.endwithendif(29) Command1的的Click事件代碼如下：事件代碼如下：go topthisform.istop=.t.thisform.isbottom=.f.thisform.refresh(30) Command2的的Click事件代碼如下：事件代碼如下：skip -1if bof( )=messagebox(前無古人！前無古人！,48,提個醒提個醒)thisform.istop=.t

41、.go topendifthisform.isbottom=.f.thisform.refresh(31) Command3的的Click事件代碼如下：事件代碼如下：skip 1if eof( )=messagebox(后無來者！后無來者！,48,提個醒提個醒)thisform.isbottom=.t.go topendifthisform.istop=.f.thisform.refresh(32) Command4的的Click事件代碼如下：事件代碼如下：go bottomthisform.istop=.f.thisform.isbottom=.t.thisform.refresh(33)

42、Command5的的Click事件代碼如下：事件代碼如下：thisform.isadd=.t.thisform.oldrecord=recno()append blankthisform.refresh(34) Command6的的Click事件代碼如下：事件代碼如下：yn=messagebox(真要刪掉嗎？真要刪掉嗎？,4+32,警個告警個告)if yn=6deleteresult=tableupdate(.F.)if result=.t.pack=messagebox(已經(jīng)干掉了已經(jīng)干掉了!,48,提個醒提個醒)else=messagebox(還沒干掉還沒干掉!,48,提個醒提個醒)=ta

43、blerevert(.f.)endifendifthisform.refresh(35)Command7的的Click事件代碼如下：事件代碼如下：result=tableupdate(.F.)if result=.f.=messagebox(存不進(jìn)去！存不進(jìn)去！,48,警個告警個告)thisform.text1.setfocus()else=messagebox(存進(jìn)去啦！存進(jìn)去啦！,48,警個告警個告)mand5.enabled=.f.thisform.cmdstaus(2)thisform.refreshendif(36) Command8的的Click事件代碼如下：事件代碼如下：rele

44、ase thisform(37) “數(shù)據(jù)維護(hù)數(shù)據(jù)維護(hù)”表單的數(shù)據(jù)環(huán)境如圖表單的數(shù)據(jù)環(huán)境如圖12.9所示。所示。 例例12.7 設(shè)計一個表單，其名定義為設(shè)計一個表單，其名定義為“數(shù)據(jù)瀏覽數(shù)據(jù)瀏覽”。運行運行“數(shù)據(jù)瀏覽數(shù)據(jù)瀏覽”的結(jié)果如圖的結(jié)果如圖12.10所示。所示。圖圖12.9圖圖12.10 “數(shù)據(jù)瀏覽數(shù)據(jù)瀏覽”表單，含有表單，含有3個標(biāo)簽控件，個標(biāo)簽控件，1個圖像控個圖像控件，件，1編輯框控件，編輯框控件，3個文本框控件，個文本框控件，1個計時器控個計時器控件，件，1命令按鈕控件。命令按鈕控件。 其中：其中：(1) 表單的主要屬性如下：表單的主要屬性如下： Caption：路線情況：路線情況

45、Top：0 Left：0 Height：304 Width：394 Fontname：宋體：宋體 Fontsize：9 Backcolor：192，192，192 Autocenter：.T. 真真 Name：form1(2) 圖像圖像1的主要屬性如下：的主要屬性如下： Top：11 Left：254 Height：137 Width：126 Backstyle：1 不透明不透明 Stretch： 2 變比填充變比填充 Name：Image1(3) 編輯框編輯框1的主要屬性如下：的主要屬性如下： Top：164 Left：20 Height：88 Width：352 Controlsource

46、：line.jj Fontname：宋體：宋體 Fontsize：11 Name：Edit1(4) 標(biāo)簽標(biāo)簽1的主要屬性如下：的主要屬性如下： Caption：路線編號：路線編號 Top：20 Left：22 Height：25 Width：73 Fontname：楷體：楷體 GB2312 Fontsize：13 Name：Label1(5) 標(biāo)簽標(biāo)簽2的主要屬性如下：的主要屬性如下： Caption：路線名稱：路線名稱 Top：72 Name：Label2其他屬性與其他屬性與Label1相同。相同。(6) 標(biāo)簽標(biāo)簽3的主要屬性如下：的主要屬性如下： Caption：團(tuán)費：團(tuán)費 Top：118

47、 Name：Label3其他屬性與其他屬性與Label1相同。相同。(7) 文本框文本框1的主要屬性如下：的主要屬性如下： Top：17 Left：109 Height：23 Width：46 Controlsource：line.lbh Fontname：宋體：宋體 Fontsize：9 Value：(無無) Name：Text1(8) 文本框文本框2的主要屬性如下：的主要屬性如下： Top：66 Width：144 Controlsource：line.mc Name：Text2其他屬性與其他屬性與Text1相同。相同。(9) 文本框文本框3的主要屬性如下：的主要屬性如下： Top：116

48、 Width：59 Controlsource：line.tf Name：Text3其他屬性與其他屬性與Text1相同。相同。(10) 計時器計時器1的主要屬性如下：的主要屬性如下： Enabled： .T. Interval：2000 Name：Timer1(11) 命令按鈕命令按鈕1的主要屬性如下：的主要屬性如下： Caption：退出：退出 Top：264 Left：288 Height：24 Width：60 Fontname：宋體：宋體 Fontsize：9 Name：Command1(12) form1的的Init事件代碼如下：事件代碼如下：public ii=0public zz

49、=4_screen.toobar1.timer1.enabled=.F.(13) Timer1的的Timer事件代碼如下：事件代碼如下：if z=4if i=6i=0endifif i=1 thisform.image1.picture=c:lylj1.bmpendifif i=2 thisform.image1.picture= c:lylj2.bmpendifif i=3 thisform.image1.picture= c:lylj3.bmpendifif i=4 thisform.image1.picture= c:lylj4.bmpendifif i=5 thisform.image

50、1.picture= c:lylj5.bmpendifi=i+1endif (14) Command1的的Click事件代碼如下：事件代碼如下：_screen.toobar1.timer1.enabled=.t.release thisform(15) “數(shù)據(jù)瀏覽數(shù)據(jù)瀏覽”表單的數(shù)據(jù)環(huán)境如圖表單的數(shù)據(jù)環(huán)境如圖12.11所示。所示。圖圖12.1112.4 設(shè)計數(shù)據(jù)查詢表單設(shè)計數(shù)據(jù)查詢表單 數(shù)據(jù)查詢表單，是用戶進(jìn)行數(shù)據(jù)資源檢索的一個工數(shù)據(jù)查詢表單，是用戶進(jìn)行數(shù)據(jù)資源檢索的一個工作窗口，也是數(shù)據(jù)庫應(yīng)用系統(tǒng)中的重要工作環(huán)境之作窗口，也是數(shù)據(jù)庫應(yīng)用系統(tǒng)中的重要工作環(huán)境之一。通過數(shù)據(jù)查詢環(huán)境，用戶可以獲取

51、大量的信息，一。通過數(shù)據(jù)查詢環(huán)境，用戶可以獲取大量的信息，從而使數(shù)據(jù)庫中的數(shù)據(jù)充分為用戶服務(wù)。從而使數(shù)據(jù)庫中的數(shù)據(jù)充分為用戶服務(wù)。 以下介紹兩個數(shù)據(jù)查詢表單的設(shè)計實例。以下介紹兩個數(shù)據(jù)查詢表單的設(shè)計實例。 例例12.8 設(shè)計一個表單，其名定義為設(shè)計一個表單，其名定義為“查詢查詢1”。運。運行行“查詢查詢1”的結(jié)果如圖的結(jié)果如圖12.12所示。所示。圖圖12.12 “查詢查詢1”表單，含有表單，含有1個標(biāo)簽控件，個標(biāo)簽控件，1組合框控件，組合框控件，1個表格控件，個表格控件，2命令按鈕控件。命令按鈕控件。 其中：其中：(1) 表單的主要屬性如下：表單的主要屬性如下： Caption：查詢團(tuán)員：查

52、詢團(tuán)員 Top：0 Left：0 Height：246 Width：410 Fontname：宋體：宋體 Fontsize：9 Icon：c:lylmisc28.ico Autocenter：.T. 真真 Name：form1(2) 組合框組合框1的主要屬性如下：的主要屬性如下： Top：15 Left：149 Height：29 Width：55 Rowsource：select distinct Tbh from member into cursor temp Rowsourcetype：3 SQL語句語句 Fontname：幼圓：幼圓 Fontsize：12 Name：Combo1(3)

53、 表格表格1的主要屬性如下：的主要屬性如下： Top：84 Left：9 Height：120 Width：395 Columncount：6 Panel：1-右右 Backcolor：255,255,255 Grid1linecolor：0,128,128 Grid1linewidth：1 Headerheight：20 Recordsource：member Name：Grid1(4) 表格表格1中第中第1列的主要屬性如下：列的主要屬性如下： Width：50 Controlsource：member.hm Columnorder：1 Name：Column1(5) 表格表格1中第中第2列

54、的主要屬性如下：列的主要屬性如下： Width：46 Controlsource：member.xm Columnorder：2 Name：Column2(6) 表格表格1中第中第3列的主要屬性如下：列的主要屬性如下： Width：40 Controlsource：member.xb Columnorder：3 Name：Column3(7) 表格表格1中第中第4列的主要屬性如下：列的主要屬性如下： Width：96 Controlsource：member.dh Columnorder：4 Name：Column4(8) 表格表格1中第中第5列的主要屬性如下：列的主要屬性如下： Width：

55、78 Controlsource：member.sfz Columnorder：5 Name：Column5(9) 表格表格1中第中第6列的主要屬性如下：列的主要屬性如下： Width：60 Controlsource：member.tf Columnorder：6 Name：Column6(10) 表格表格1中第中第1列標(biāo)題的主要屬性如下：列標(biāo)題的主要屬性如下： Caption：團(tuán)員編號：團(tuán)員編號 Name：Header1(11) 表格表格1中第中第2列標(biāo)題的主要屬性如下：列標(biāo)題的主要屬性如下： Caption：姓：姓 名名 Name：Header1(12) 表格表格1中第中第3列標(biāo)題的主要

56、屬性如下：列標(biāo)題的主要屬性如下： Caption：性：性 別別 Name：Header1(13) 表格表格1中第中第4列標(biāo)題的主要屬性如下：列標(biāo)題的主要屬性如下： Caption：電話：電話 Name：Header1(14) 表格表格1中第中第5列標(biāo)題的主要屬性如下：列標(biāo)題的主要屬性如下： Caption：身：身 份份 證證 Name：Header1(15) 表格表格1中第中第6列標(biāo)題的主要屬性如下：列標(biāo)題的主要屬性如下： Caption：團(tuán)費交否：團(tuán)費交否 Name：Header1(16) 標(biāo)簽標(biāo)簽1的主要屬性如下：的主要屬性如下： Caption：團(tuán)隊編號：團(tuán)隊編號 Top：20 Left

57、：39 Height：25 Width：85 Fontname：楷體：楷體 GB2312 Fontsize：13 Name：Label1 (17) 命令按鈕命令按鈕1的主要屬性如下：的主要屬性如下： Caption：查詢：查詢 Top：17 Left：285 Height：27 Width：67 Fontname：宋體：宋體 Fontsize：9 Name：Command1(18) 命令按鈕命令按鈕2的主要屬性如下：的主要屬性如下： Caption：退出：退出 Top：216 Left：312 Height：25 Width：60 Fontname：宋體：宋體 Fontsize：9 Name：

58、Command2(19) Command1的的Click事件代碼如下：事件代碼如下：if empty(bo1.value)set filter toelseset filter to Tbh=bo1.valueendifthisform.grid1.refreshthisform.grid1.setfocus(20) Command2的的Click事件代碼如下：事件代碼如下：thisform.release(21) “查詢查詢1”表單的數(shù)據(jù)環(huán)境如圖表單的數(shù)據(jù)環(huán)境如圖12.13所示。所示。圖圖12.13 例例12.9 設(shè)計一個表單，其名定義為設(shè)計一個表單，其名定義為“查詢查詢2”。運。運行行“查

59、詢查詢2”的結(jié)果如圖的結(jié)果如圖12.14所示。所示。圖圖12.14 “查詢查詢2”表單，含有表單，含有1個標(biāo)簽控件，個標(biāo)簽控件，1個單選按鈕組個單選按鈕組控件控件(其中包含其中包含3個單選按鈕個單選按鈕)，1個命令按鈕組控件個命令按鈕組控件(其中包含其中包含2個命令按鈕個命令按鈕)。 其中：其中：(1) 表單的主要屬性如下：表單的主要屬性如下： Caption：選項窗口：選項窗口 Top：0 Left：0 Height：196 Width：189 Fontname：宋體：宋體 Fontsize：9 Autocenter：.T. 真真 Name：form1(2) 標(biāo)簽標(biāo)簽1的主要屬性如下：的主要

60、屬性如下： Caption：請選擇查詢編輯對象：請選擇查詢編輯對象 Top：14 Left：49 Height：25 Width：85 Fontname：宋體：宋體 Fontsize：9 Name：Label1(3) 單選按鈕組單選按鈕組1的主要屬性如下：的主要屬性如下： Top：48 Left：36 Height：60 Width：121 Buttoncount：3 Value：1 Autosize： .T. Name：Optiongroup1(4) 單選按鈕單選按鈕1的主要屬性如下：的主要屬性如下： Caption：查詢進(jìn)球信息：查詢進(jìn)球信息 Top：5 Left：5 Height：16