第8章表單設(shè)計(jì)

1、8.1 8.1 表單設(shè)計(jì)基礎(chǔ)表單設(shè)計(jì)基礎(chǔ)8.1.1 8.1.1 表單簡(jiǎn)介表單簡(jiǎn)介1.1.表單控件表單控件 表單：即表單：即窗口窗口, ,一種用戶界面一種用戶界面. .表單是一種表單是一種容器類控件容器類控件，在它上面可以，在它上面可以添加其它控件。添加其它控件。2.2.表單的屬性表單的屬性 ( (表表8-2)8-2)主要屬性：主要屬性： CaptionCaption其它：其它：visiblevisible、backcolorbackcolor、autocenterautocenter3.3.表單事件表單事件(1)(1)表單常用事件表單常用事件 表表P247P247表表8-3:8-3: load

2、 load、initinit（二者均為系統(tǒng)事件）（二者均為系統(tǒng)事件）說(shuō)明：說(shuō)明：不同的控件能夠響應(yīng)的事件各不相不同的控件能夠響應(yīng)的事件各不相同同. .VFPVFP系統(tǒng)事件發(fā)生的先后順序：系統(tǒng)事件發(fā)生的先后順序：表 單表 單 l o a d l o a d 對(duì) 象對(duì) 象 ( ( 從 內(nèi) 到 外從 內(nèi) 到 外 ) ) init init 表單表單activate activate 用戶觸用戶觸發(fā)事件發(fā)事件 表單表單unloadunload(2)(2)事件過(guò)程事件過(guò)程：某事件發(fā)生時(shí)所執(zhí)行的代碼某事件發(fā)生時(shí)所執(zhí)行的代碼, ,稱為該事稱為該事件對(duì)應(yīng)的事件過(guò)程件對(duì)應(yīng)的事件過(guò)程. . (3)(3)事件驅(qū)動(dòng)方

3、式事件驅(qū)動(dòng)方式: :P246P246系統(tǒng)處于等待狀態(tài)系統(tǒng)處于等待狀態(tài), ,直到某直到某事件發(fā)生事件發(fā)生, ,轉(zhuǎn)轉(zhuǎn)去去執(zhí)行執(zhí)行對(duì)應(yīng)的對(duì)應(yīng)的事件過(guò)程事件過(guò)程, , 事件過(guò)程執(zhí)行事件過(guò)程執(zhí)行完畢后完畢后, ,系統(tǒng)又處于等待狀態(tài)系統(tǒng)又處于等待狀態(tài), ,等待下一等待下一事件發(fā)生。事件發(fā)生。4. 4. 常見(jiàn)表單方法程序常見(jiàn)表單方法程序P246P246 主要：主要：refreshrefresh、releaserelease 其它：其它：showshow、hidehide等等5.5.表單的數(shù)據(jù)環(huán)境表單的數(shù)據(jù)環(huán)境 若設(shè)計(jì)的表單要用到表文件若設(shè)計(jì)的表單要用到表文件.dbf.dbf， 則則要把需要用到的表添加到表單

4、的數(shù)據(jù)要把需要用到的表添加到表單的數(shù)據(jù)環(huán)境中，環(huán)境中，運(yùn)行表單時(shí)將自動(dòng)打開(kāi)這些運(yùn)行表單時(shí)將自動(dòng)打開(kāi)這些表。表。 并且設(shè)置用以顯示字段信息的相關(guān)并且設(shè)置用以顯示字段信息的相關(guān)控件控件( (與數(shù)據(jù)綁定的控件與數(shù)據(jù)綁定的控件) )的相關(guān)屬性的相關(guān)屬性p248p248表表. .6. 6. 用用 表單設(shè)計(jì)器表單設(shè)計(jì)器 設(shè)計(jì)表單的步驟：設(shè)計(jì)表單的步驟：P248P248 7. 7. 生成表單的方法：生成表單的方法：表單向?qū)П韱蜗驅(qū)Э焖俦韱慰焖俦韱问褂帽韱卧O(shè)計(jì)器使用表單設(shè)計(jì)器8.1.2 8.1.2 表單向?qū)П韱蜗驅(qū)?. .表單向?qū)П韱蜗驅(qū)Ю?-1:8-1: 用用“表單向?qū)П韱蜗驅(qū)А苯W(xué)生基本建立學(xué)生基本情

5、況表單情況表單 觀察觀察: : 文本框的文本框的ControlSourceControlSource屬屬性與表單的數(shù)據(jù)環(huán)境性與表單的數(shù)據(jù)環(huán)境2.2.一對(duì)多表單向?qū)б粚?duì)多表單向?qū)Ю?-2: 8-2: 用表單向?qū)в帽韱蜗驅(qū)?根據(jù)根據(jù)“學(xué)生學(xué)生”和和“選課選課”建立成績(jī)表單建立成績(jī)表單觀察：觀察：文本框的文本框的ControlSourceControlSource屬性、屬性、表格的表格的RecordSourceRecordSource屬性和表格屬性和表格列的列的ControlSourceControlSource屬性與表單的屬性與表單的數(shù)據(jù)環(huán)境數(shù)據(jù)環(huán)境設(shè)計(jì)步驟：設(shè)計(jì)步驟：P251P2518.1.3

6、 8.1.3 表單設(shè)計(jì)器表單設(shè)計(jì)器文件文件新建新建表單表單1. 1. 控件的畫(huà)法控件的畫(huà)法, ,按鈕鎖定按鈕鎖定2.2.屬性窗口屬性窗口 P258P258(1)(1)對(duì)象對(duì)象: : 對(duì)象名稱，對(duì)象名稱，默認(rèn)默認(rèn)namename屬性值屬性值(2) (2) 選項(xiàng)卡選項(xiàng)卡(3)(3)屬性設(shè)置框?qū)傩栽O(shè)置框: : 用來(lái)更改屬性值,三種可能方式:A.直接輸入屬性值,后enter B.通過(guò)下拉框輸入C.啟動(dòng)對(duì)話框(單擊右側(cè)帶有的按鈕)(4)(4)屬性列表框?qū)傩粤斜砜?雙擊屬性名遍歷所有可選項(xiàng)雙擊屬性名遍歷所有可選項(xiàng) (5)(5)屬性說(shuō)明信息屬性說(shuō)明信息引引: : 創(chuàng)建控件創(chuàng)建控件 表表8-78-7控件的名稱

7、控件的名稱 剪切、復(fù)制、調(diào)整大小、多對(duì)象的選定剪切、復(fù)制、調(diào)整大小、多對(duì)象的選定shiftshift 設(shè)置對(duì)象屬性設(shè)置對(duì)象屬性( (命令按鈕下一條命令按鈕下一條) ) 6.6.調(diào)整控件布局調(diào)整控件布局 P257P257(1) (1) 手動(dòng)調(diào)整手動(dòng)調(diào)整(2) (2) 使用布局工具欄使用布局工具欄多個(gè)對(duì)象的選定：多個(gè)對(duì)象的選定：shift+shift+單擊單擊 拖曳拖曳附：附：VFPVFP工具欄的顯示與隱藏工具欄的顯示與隱藏 “顯示顯示”菜單菜單 “ “工具欄工具欄” ”n表單設(shè)計(jì)器工具欄表單設(shè)計(jì)器工具欄n表單控件工具欄表單控件工具欄n布局工具欄布局工具欄n調(diào)色板工具欄調(diào)色板工具欄7.7.代碼編輯

8、窗口代碼編輯窗口P259P259打開(kāi)對(duì)象的代碼窗口常用的方法是：打開(kāi)對(duì)象的代碼窗口常用的方法是：雙擊雙擊對(duì)象對(duì)象u對(duì)象組合框?qū)ο蠼M合框: : 顯示當(dāng)前顯示當(dāng)前對(duì)象對(duì)象u過(guò)程組合框過(guò)程組合框: : 選擇選擇事件事件例：設(shè)置例：設(shè)置“下一條下一條”command1command1的的clickclick事件代碼：事件代碼：SkipSkipThisform.refreshThisform.refresh8. 8. 表單設(shè)計(jì)器中數(shù)據(jù)環(huán)境的設(shè)置表單設(shè)計(jì)器中數(shù)據(jù)環(huán)境的設(shè)置 當(dāng)表單上顯示的數(shù)據(jù)來(lái)源于當(dāng)表單上顯示的數(shù)據(jù)來(lái)源于dbfdbf表文表文件時(shí)，需要向表單的件時(shí)，需要向表單的“數(shù)據(jù)環(huán)境設(shè)計(jì)數(shù)據(jù)環(huán)境設(shè)計(jì)器器

9、”中添加表。中添加表。打開(kāi)數(shù)據(jù)環(huán)境設(shè)計(jì)器的方法：打開(kāi)數(shù)據(jù)環(huán)境設(shè)計(jì)器的方法：右擊右擊表單表單選擇快捷菜單中的選擇快捷菜單中的“數(shù)據(jù)環(huán)境數(shù)據(jù)環(huán)境”命令命令 (1)(1)添加表或視圖添加表或視圖 22若有兩個(gè)或多個(gè)表，設(shè)置表間關(guān)系若有兩個(gè)或多個(gè)表，設(shè)置表間關(guān)系 (3)(3)將要在表單上顯示的字段從將要在表單上顯示的字段從“數(shù)據(jù)環(huán)數(shù)據(jù)環(huán)境境”中拖向表單中拖向表單。8.1.4 表單的運(yùn)行表單的運(yùn)行(1)(1)命令格式：命令格式： Do form Do form .scx(2) (2) ! ! (3) “(3) “程序程序”“運(yùn)行運(yùn)行”8.2 表單控件的使用表單控件的使用8.2.1 8.2.1 控件的基本

10、操作控件的基本操作1.1.創(chuàng)建控件創(chuàng)建控件( (單擊、拖動(dòng)單擊、拖動(dòng)) )2.2.調(diào)整控件調(diào)整控件 選定單個(gè)或多個(gè)控件、調(diào)整大小、調(diào)選定單個(gè)或多個(gè)控件、調(diào)整大小、調(diào)整位置、刪除剪切控件整位置、刪除剪切控件. .3.3.設(shè)置控件屬性設(shè)置控件屬性8.2.2 標(biāo)簽控件標(biāo)簽控件(Label)1)1)功用功用：主要用于顯示固定的文本信息。：主要用于顯示固定的文本信息。2)2)主要屬性：主要屬性：CaptionCaption: : 標(biāo)題文本標(biāo)題文本, ,即標(biāo)簽上顯示的字即標(biāo)簽上顯示的字 C C型型Name: Name: 標(biāo)簽的名稱標(biāo)簽的名稱( (默認(rèn)默認(rèn)Label1Label1,label2,label2

11、一般不改一般不改) )FontNameFontName：字體：字體FontsizeFontsize：字體大小字體大小 FontBoldFontBold：字體是否加粗：字體是否加粗ForeColorForeColor：前景色：前景色,即字體顏色即字體顏色BackColor：背景色：背景色AutosizeAutosize：根據(jù)顯示信息的多少是否根據(jù)顯示信息的多少是否自動(dòng)調(diào)整標(biāo)簽寬度自動(dòng)調(diào)整標(biāo)簽寬度Visible : Visible : 標(biāo)簽是否可見(jiàn)標(biāo)簽是否可見(jiàn)2)2)事件事件一般不設(shè)計(jì)標(biāo)簽響應(yīng)的事件，但標(biāo)簽可一般不設(shè)計(jì)標(biāo)簽響應(yīng)的事件，但標(biāo)簽可以響應(yīng)以響應(yīng)clickclick事件事件. . 例例8-

12、38-3 設(shè)計(jì)如圖設(shè)計(jì)如圖8-248-24所示的所示的“教學(xué)管教學(xué)管理系統(tǒng)理系統(tǒng)”的系統(tǒng)登錄表單的系統(tǒng)登錄表單DL1.SCX.DL1.SCX. 表單主要屬性：表單主要屬性：caption caption 表表8-118-11 標(biāo)簽主要屬性：標(biāo)簽主要屬性：captioncaption、 fontnamefontname、fontsizefontsize、autosizeautosize8.2.3 8.2.3 文本框控件文本框控件(TextBox)(TextBox)1)1)功能功能：主要用于接收用戶輸入，也可用：主要用于接收用戶輸入，也可用于顯示信息，一般只包含一行文本于顯示信息，一般只包含一行文

13、本. . 畫(huà)一個(gè)演示畫(huà)一個(gè)演示2)2)主要屬性主要屬性: :Name: Name: 名稱名稱 默認(rèn)默認(rèn)text1text1,text2,text2ValueValue: : 文本框的值文本框的值( (文本框中顯示的信息文本框中顯示的信息) )ReadOlny : ReadOlny : 文本框是否只讀文本框是否只讀PasswordChar : PasswordChar : 文本框的占位符文本框的占位符ControlSourceControlSource : : 文本框的數(shù)據(jù)源文本框的數(shù)據(jù)源其它：其它：n輸出格式控制輸出格式控制FormatFormatKK：當(dāng)控件具有焦點(diǎn)時(shí)選擇所有文本。：當(dāng)控件具

14、有焦點(diǎn)時(shí)選擇所有文本。n輸入格式輸入格式InputmaskInputmask常用掩碼常用掩碼P126： ! !、 X X 、9 9 例例8-48-4 文本框的輸入功能文本框的輸入功能 設(shè)計(jì)一個(gè)可以輸入操作員姓名和密碼的表單。設(shè)計(jì)一個(gè)可以輸入操作員姓名和密碼的表單。 演示演示 例例 文本框的輸出功能、文本框與數(shù)據(jù)的綁文本框的輸出功能、文本框與數(shù)據(jù)的綁定定. . 設(shè)計(jì)顯示學(xué)生表的學(xué)號(hào)、姓名、入?？偡肿衷O(shè)計(jì)顯示學(xué)生表的學(xué)號(hào)、姓名、入校總分字段信息的表單。段信息的表單。 演示演示文本框綁定文本框綁定.scx.scx 方法方法1:1: 手動(dòng)繪制各對(duì)象、設(shè)置數(shù)據(jù)環(huán)境、設(shè)手動(dòng)繪制各對(duì)象、設(shè)置數(shù)據(jù)環(huán)境、設(shè)置文

15、本框的置文本框的controlsourcecontrolsource屬性屬性. . 演示在文本框中修改演示在文本框中修改數(shù)據(jù)會(huì)影響表數(shù)據(jù)數(shù)據(jù)會(huì)影響表數(shù)據(jù). . 方法方法2:2: 從數(shù)據(jù)環(huán)境中拖字段入表單從數(shù)據(jù)環(huán)境中拖字段入表單( (自動(dòng)設(shè)自動(dòng)設(shè)置置namename屬性，屬性，controlsourcecontrolsource屬性等屬性等) )注意注意：(1)(1)默認(rèn)情況下默認(rèn)情況下，在文本框中輸入的內(nèi)容，在文本框中輸入的內(nèi)容（valuevalue屬性的值），不管是數(shù)字還是字屬性的值），不管是數(shù)字還是字符，符，均默認(rèn)是均默認(rèn)是字符型字符型(C)(C) (2)(2)文本框中可以輸入文本框中可以

16、輸入C C、NN、D D、L L型的數(shù)據(jù)，型的數(shù)據(jù)，由由valuevalue屬性初值的類型屬性初值的類型決定決定: : 字符型字符型 無(wú)無(wú) 默認(rèn)輸入的數(shù)據(jù)是字符型默認(rèn)輸入的數(shù)據(jù)是字符型 數(shù)值型數(shù)值型 0 0 日期型日期型 邏輯型邏輯型 .F. .F.3 3）事件：）事件：常用文本框事件有常用文本框事件有Gotfocus: Gotfocus: 當(dāng)文本框獲得焦點(diǎn)時(shí)發(fā)生當(dāng)文本框獲得焦點(diǎn)時(shí)發(fā)生Lostfous: Lostfous: 當(dāng)文本框失去焦點(diǎn)時(shí)發(fā)生當(dāng)文本框失去焦點(diǎn)時(shí)發(fā)生(tab(tab或或enter)enter)Keypress: Keypress: 當(dāng)用戶按下并釋放鍵盤(pán)上當(dāng)用戶按下并釋放鍵盤(pán)上

17、的某個(gè)鍵時(shí)發(fā)生的某個(gè)鍵時(shí)發(fā)生4 4）主要方法）主要方法：setfocus (setfocus (將焦點(diǎn)設(shè)置將焦點(diǎn)設(shè)置到某對(duì)象上到某對(duì)象上) ) 如：如：thisform.text1.setfocusthisform.text1.setfocus例：例：輸入半徑求圓面積輸入半徑求圓面積. .演示演示 圓面積圓面積.scx.scx分析：在分析：在text1text1中輸入中輸入半徑半徑，回車回車后在后在text2text2中中顯示結(jié)果顯示結(jié)果,text2,text2中中不可輸入數(shù)據(jù)不可輸入數(shù)據(jù). .主要屬性設(shè)置主要屬性設(shè)置Text1: value 0Text1: value 0 format K

18、format K Text2: value 0 Text2: value 0 readonly .t. readonly .t.編寫(xiě)編寫(xiě)Text1.keypressText1.keypress事件代碼事件代碼: :r=thisform.text1.valuer=thisform.text1.valueif nkeycode=13if nkeycode=13 thisform.text2.value=3.14 thisform.text2.value=3.14* *r r* *r r endif endifText1Text1中輸完數(shù)據(jù)后中輸完數(shù)據(jù)后, ,敲回車敲回車, ,光標(biāo)光標(biāo)( (焦焦點(diǎn)點(diǎn)

19、) )自動(dòng)定位到自動(dòng)定位到text2text2中中, text2, text2獲得獲得焦點(diǎn)發(fā)生焦點(diǎn)發(fā)生gotfocusgotfocus事件事件Text2.gotfocusText2.gotfocus事件代碼事件代碼: :thisform.text1.setfocusthisform.text1.setfocus說(shuō)明：若最初沒(méi)有設(shè)置文本框的說(shuō)明：若最初沒(méi)有設(shè)置文本框的valuevalue屬性，則輸入的數(shù)字默認(rèn)是字符型，屬性，則輸入的數(shù)字默認(rèn)是字符型，計(jì)算面積時(shí)需用計(jì)算面積時(shí)需用val()val()函數(shù)進(jìn)行轉(zhuǎn)換函數(shù)進(jìn)行轉(zhuǎn)換. .8.2.4 8.2.4 命令按鈕命令按鈕(Command)(Comma

20、nd)1.1.功能功能: : 起控制作用起控制作用2.2.主要屬性主要屬性 name: name: 名稱名稱 默認(rèn)默認(rèn)command1,command2command1,command2 captioncaption ：命令按鈕標(biāo)題：命令按鈕標(biāo)題 上面的字上面的字 enabled:enabled: 命令按鈕是否可用命令按鈕是否可用3. 3. 事件事件 ：Click:Click: 當(dāng)用戶點(diǎn)擊命令按鈕時(shí)發(fā)生當(dāng)用戶點(diǎn)擊命令按鈕時(shí)發(fā)生 例例8-58-5設(shè)計(jì)設(shè)計(jì)P267P267圖圖8-298-29帶有命令按鈕的系統(tǒng)登帶有命令按鈕的系統(tǒng)登錄表單錄表單. . 假設(shè)假設(shè)“李春昆李春昆”的密碼是的密碼是“08”

21、08”。 演示演示 (1)Command1(1)Command1(確定確定) )的的clickclick事件代碼：事件代碼：n 若輸入的姓名和密碼正確：用信息對(duì)話框顯示“歡迎使用”。label5不可見(jiàn)。n 若輸入的姓名或密碼錯(cuò)誤：label5可見(jiàn)，顯示“操作員姓名或密碼錯(cuò)，請(qǐng)重新輸入”。將焦點(diǎn)定位于text2中，并將其內(nèi)容清空。(2) command2(2) command2(取消取消) )的的clickclick事件代碼事件代碼: : 用信息對(duì)話框提示是否退出圖8-32n若點(diǎn)擊若點(diǎn)擊“是是”：關(guān)閉表單：關(guān)閉表單n若點(diǎn)擊了若點(diǎn)擊了“否否”：信息對(duì)話框提示：信息對(duì)話框提示“重新輸入重新輸入”,

22、,并將焦點(diǎn)定位于并將焦點(diǎn)定位于text2text2中中. .8.2.5 列表框列表框(ListBox)1.1.功用：功用：用于顯示供用戶選擇的列表項(xiàng)。用于顯示供用戶選擇的列表項(xiàng)。2.2.主要屬性：主要屬性：lname(list1,list2) name(list1,list2) lRowSourceRowSource：列表框數(shù)據(jù)的來(lái)源：列表框數(shù)據(jù)的來(lái)源lRowSourceTypeRowSourceType: :列表框數(shù)據(jù)源的類型列表框數(shù)據(jù)源的類型( (無(wú)，無(wú)，字段，字段，SQL)SQL)lvalue value : :返回列表框中選定列表項(xiàng)的值返回列表框中選定列表項(xiàng)的值( (默認(rèn)默認(rèn)字符型字符

23、型) )其它屬性：其它屬性：lColumnCount: ColumnCount: 列表框的列數(shù)列表框的列數(shù)lboundcolumnboundcolumn：當(dāng)列表框有多列：當(dāng)列表框有多列時(shí)，指定與時(shí)，指定與valuevalue屬性綁定的列。屬性綁定的列。lListcountListcount：列表框中列表項(xiàng)的個(gè)數(shù)：列表框中列表項(xiàng)的個(gè)數(shù)lListindexListindex：返回選定列表項(xiàng)的順序：返回選定列表項(xiàng)的順序號(hào)號(hào)( (取值范圍為取值范圍為1listcount)1listcount)例例8-68-6 設(shè)計(jì)一個(gè)如圖設(shè)計(jì)一個(gè)如圖8-338-33的登錄表單的登錄表單 演示演示 將所有操作員的姓名及

24、其密碼保存在將所有操作員的姓名及其密碼保存在“教師密碼教師密碼.dbf”.dbf”中。中。（操作員不再局限于操作員不再局限于“李春李春昆昆”一個(gè)人。一個(gè)人。 使用表存儲(chǔ)操作員信息，操作更簡(jiǎn)單，不必使用表存儲(chǔ)操作員信息，操作更簡(jiǎn)單，不必用多個(gè)用多個(gè)if elseif else的嵌套）的嵌套）數(shù)據(jù)環(huán)境：數(shù)據(jù)環(huán)境：教師密碼教師密碼.dbf.dbf主要屬性：主要屬性：List1: RowSource List1: RowSource 教師密碼教師密碼. .姓名姓名 RowSourceType RowSourceType 字段字段編寫(xiě)編寫(xiě)command1.clickcommand1.click事件代碼事

25、件代碼檢測(cè)在檢測(cè)在list1list1中選中的姓名中選中的姓名thisform.list1. thisform.list1. valuevalue與輸入的密碼是否匹配（通過(guò)使用與輸入的密碼是否匹配（通過(guò)使用“教教師密碼師密碼.dbf”.dbf”檢測(cè)）檢測(cè)） 書(shū)上程序不合理書(shū)上程序不合理3.3.主要事件主要事件InteractiveChangeInteractiveChange：用戶使用鼠標(biāo)或用戶使用鼠標(biāo)或鍵盤(pán)修改列表框的值時(shí)發(fā)生（即選擇不鍵盤(pán)修改列表框的值時(shí)發(fā)生（即選擇不同的列表項(xiàng)時(shí)發(fā)生）同的列表項(xiàng)時(shí)發(fā)生）Click:Click: 單擊列表項(xiàng)時(shí)發(fā)生。單擊列表項(xiàng)時(shí)發(fā)生。例：例：設(shè)計(jì)一個(gè)表單：在列

26、表框中顯示所有設(shè)計(jì)一個(gè)表單：在列表框中顯示所有學(xué)生的學(xué)號(hào)，單擊任意一個(gè)列表項(xiàng)，右學(xué)生的學(xué)號(hào)，單擊任意一個(gè)列表項(xiàng)，右則 文 本 框 中 顯 示 該 生 的 信 息 。則 文 本 框 中 顯 示 該 生 的 信 息 。list_interaclist_interac4.4.方法：方法： (1) (1) 向列表框添加一個(gè)列表項(xiàng)向列表框添加一個(gè)列表項(xiàng)對(duì)象名對(duì)象名. Additem( . Additem( 字符串字符串) )說(shuō)明：默認(rèn)向列表框末尾添加列表項(xiàng)說(shuō)明：默認(rèn)向列表框末尾添加列表項(xiàng)(2) (2) 刪除一個(gè)列表項(xiàng)刪除一個(gè)列表項(xiàng)對(duì)象名對(duì)象名.removeitem(.removeitem(列表項(xiàng)序號(hào)列表

27、項(xiàng)序號(hào) ) ) 例例 演示演示list_additem.scxlist_additem.scx8.2.6 8.2.6 組合框組合框(ComboBox)(ComboBox) 功用：功用：用于從列表項(xiàng)中選取數(shù)據(jù)并顯示用于從列表項(xiàng)中選取數(shù)據(jù)并顯示在編輯窗口中。在編輯窗口中。與列表框功能相同，區(qū)別與列表框功能相同，區(qū)別270270主要屬性主要屬性與方法和列表框相同：與方法和列表框相同：RowSourceRowSource：組合框數(shù)據(jù)的來(lái)源：組合框數(shù)據(jù)的來(lái)源RowSourceTypeRowSourceType: :組合框數(shù)據(jù)源的類型組合框數(shù)據(jù)源的類型Style:Style: 0 0下拉組合框下拉組合框(

28、 (既可在列表中選既可在列表中選擇列表項(xiàng)，也可在組合框中鍵入一值擇列表項(xiàng)，也可在組合框中鍵入一值) ) 1 1下拉列表框下拉列表框( (僅可在列表中選僅可在列表中選擇列表項(xiàng)擇列表項(xiàng)) )value :value : 返回組合框中選擇的列表項(xiàng)返回組合框中選擇的列表項(xiàng)Displayvalue: Displayvalue: 返回組合框中輸入的返回組合框中輸入的文本或選擇的列表項(xiàng)文本或選擇的列表項(xiàng). .例例8-7 8-7 P271 P271 設(shè)計(jì)如圖設(shè)計(jì)如圖8-358-35的登錄系的登錄系統(tǒng)的身份驗(yàn)證表單。統(tǒng)的身份驗(yàn)證表單。 假設(shè)每個(gè)教師的假設(shè)每個(gè)教師的登錄密碼是登錄密碼是教師號(hào)教師號(hào)。在組合框中選擇

29、教師姓名，在文本框在組合框中選擇教師姓名，在文本框中輸入密碼，單擊中輸入密碼，單擊“確定確定”按鈕檢測(cè)按鈕檢測(cè)輸入的密碼是否正確。若正確輸入的密碼是否正確。若正確將成功將成功登錄的用戶的姓名和登錄時(shí)間記錄在登錄的用戶的姓名和登錄時(shí)間記錄在“JRJL.dbf”JRJL.dbf”中。中。演示演示數(shù)據(jù)環(huán)境數(shù)據(jù)環(huán)境: : 教師教師.dbf .dbf JRJL.dbfJRJL.dbf8.2.7 編輯框編輯框(EditBox)n功能功能：與：與文本框的功能基本相同，文本框的功能基本相同，編輯框主要用于輸入編輯框主要用于輸入多段多段文本，或文本，或顯示顯示備注字段備注字段的信息。的信息。n 允許自動(dòng)換行允許

30、自動(dòng)換行, , 并能用方向鍵、并能用方向鍵、PageUpPageUp和和pagedownpagedown鍵以及滾鍵以及滾動(dòng)條來(lái)瀏覽文本。動(dòng)條來(lái)瀏覽文本。2.2.主要屬性主要屬性：Name: Name: 默認(rèn)默認(rèn)edit1edit1、edit2edit2ControlSourceControlSource：綁定的數(shù)據(jù)源綁定的數(shù)據(jù)源Readonly: Readonly: 是否只讀是否只讀Scrollbars 0:Scrollbars 0:無(wú)滾動(dòng)條無(wú)滾動(dòng)條 2: 2: 有垂直滾動(dòng)條有垂直滾動(dòng)條( (默認(rèn)默認(rèn)) )3.3.與文本框的區(qū)別：與文本框的區(qū)別：文本框文本框: :可容納可容納一段一段文本文本,

31、 ,可編輯可編輯4 4種類型種類型的數(shù)據(jù)的數(shù)據(jù)編輯框編輯框: : 可容納可容納多段多段文本文本, ,僅可編輯僅可編輯字符型字符型數(shù)據(jù)數(shù)據(jù)例例8-8: 8-8: 設(shè)計(jì)一個(gè)如圖設(shè)計(jì)一個(gè)如圖8-378-37所示的顯示和編輯所示的顯示和編輯學(xué)生特長(zhǎng)表單。學(xué)生特長(zhǎng)表單。要求輸入姓名回車后，在編輯框中顯示特長(zhǎng)。要求輸入姓名回車后，在編輯框中顯示特長(zhǎng)。控件的主要屬性設(shè)置：控件的主要屬性設(shè)置：form1: captionform1: captionEdit1: Edit1: controlsourcecontrolsource 自動(dòng)顯示當(dāng)前記錄自動(dòng)顯示當(dāng)前記錄指針?biāo)赶虻挠涗浿邢鄳?yīng)字段的值指針?biāo)赶虻挠涗浿邢?/p>

32、應(yīng)字段的值數(shù)據(jù)環(huán)境：數(shù)據(jù)環(huán)境：學(xué)生學(xué)生事件代碼編寫(xiě)：事件代碼編寫(xiě)： edit1.lostfocusedit1.lostfocus form1.init form1.init 為使表單運(yùn)行時(shí)不顯示第一個(gè)為使表單運(yùn)行時(shí)不顯示第一個(gè)學(xué)生的特長(zhǎng)，將記錄指針指向文件尾。學(xué)生的特長(zhǎng)，將記錄指針指向文件尾。事件執(zhí)行順序：事件執(zhí)行順序：8.2.8 8.2.8 復(fù)選框復(fù)選框(CheckBox)(CheckBox)1. 1. 功用：功用：用于提供只有兩個(gè)邏輯值選項(xiàng)用于提供只有兩個(gè)邏輯值選項(xiàng)的控件，用戶可選中或清除。的控件，用戶可選中或清除。2.2.主要屬性主要屬性: : NameName：默認(rèn)：默認(rèn)check1c

33、heck1、check2 check2 CaptionCaption：指定顯示在復(fù)選框右邊的文字指定顯示在復(fù)選框右邊的文字 valuevalue 0 0未選中未選中 11選中選中 22不能用不能用3.3.事件：事件：clickclick例：例： “復(fù)選框復(fù)選框.scx” .scx” 演示演示例例8-9: 8-9: 設(shè)計(jì)一個(gè)查詢學(xué)生選課成績(jī)的設(shè)計(jì)一個(gè)查詢學(xué)生選課成績(jī)的表單表單P273P273圖圖8-408-40。SqlSql查詢可不用事先打開(kāi)表查詢可不用事先打開(kāi)表8.2.9 8.2.9 選項(xiàng)按鈕組選項(xiàng)按鈕組(OptionGroup)(OptionGroup)1. 1. 功能：功能：提供給用戶多個(gè)

34、選項(xiàng)，用戶提供給用戶多個(gè)選項(xiàng)，用戶選擇其中一個(gè)選項(xiàng)。選擇其中一個(gè)選項(xiàng)。( (多選一多選一) )2. 2. 是一個(gè)是一個(gè)容器類控件容器類控件，它的直接下級(jí)，它的直接下級(jí)對(duì)象是選項(xiàng)按鈕對(duì)象是選項(xiàng)按鈕(Option)(Option)3.3.選項(xiàng)按鈕組主要屬性：選項(xiàng)按鈕組主要屬性：name: name: optiongroup1,optiongroup2optiongroup1,optiongroup2ButtonCountButtonCount: : 選項(xiàng)按鈕個(gè)數(shù)選項(xiàng)按鈕個(gè)數(shù)ValueValue: : 若若valuevalue屬性值為屬性值為n n，表示第，表示第n n個(gè)按鈕被選中個(gè)按鈕被選中4.4

35、.選項(xiàng)按鈕的主要屬性：選項(xiàng)按鈕的主要屬性： name:name:名稱名稱(option1(option1、option2)option2) Caption: Caption: 標(biāo)題文本標(biāo)題文本 選項(xiàng)按鈕旁邊的文字選項(xiàng)按鈕旁邊的文字 注意：注意：容器類對(duì)象容器類對(duì)象( (如選項(xiàng)按鈕組如選項(xiàng)按鈕組) )的編的編輯：輯：右擊對(duì)象，在快捷菜單中選擇右擊對(duì)象，在快捷菜單中選擇“編輯編輯”命令。命令。5. 5. 選項(xiàng)按鈕組選項(xiàng)按鈕組常見(jiàn)事件常見(jiàn)事件: : click click 事件事件例例8-20 8-20 設(shè)計(jì)一表單，輸入兩數(shù)，求設(shè)計(jì)一表單，輸入兩數(shù)，求兩數(shù)的和、差、積或商兩數(shù)的和、差、積或商. .演

36、示演示 各控件屬性設(shè)置各控件屬性設(shè)置 表表8-24 8-24 (1)(1)可以用可以用選項(xiàng)按鈕生成器選項(xiàng)按鈕生成器，避免設(shè)置，避免設(shè)置屬性的麻煩。屬性的麻煩。(2) (2) 命令按鈕的命令按鈕的clickclick事件代碼的編寫(xiě)事件代碼的編寫(xiě)8.2.10 微調(diào)控件微調(diào)控件(Spinner)1. 1. 功能：功能：用于接收給定范圍內(nèi)的數(shù)值輸入用于接收給定范圍內(nèi)的數(shù)值輸入2.屬性： name(spinner1 name(spinner1 、spinner2)spinner2) increment: increment:按一次微調(diào)按鈕的增減數(shù)按一次微調(diào)按鈕的增減數(shù) SpinnerHighvalue:

37、SpinnerHighvalue:可輸入或調(diào)節(jié)的可輸入或調(diào)節(jié)的最大值。最大值。 SpinnerLowValue:SpinnerLowValue:可輸入或調(diào)節(jié)的可輸入或調(diào)節(jié)的最小值。最小值。Controlsource:Controlsource: 微調(diào)按鈕數(shù)據(jù)源微調(diào)按鈕數(shù)據(jù)源valuevalue: : 微調(diào)控件的當(dāng)前值微調(diào)控件的當(dāng)前值例例:8-11 :8-11 設(shè)計(jì)一個(gè)教師工資調(diào)整表單。設(shè)計(jì)一個(gè)教師工資調(diào)整表單。演示演示數(shù)據(jù)環(huán)境：教師數(shù)據(jù)環(huán)境：教師主要屬性：表主要屬性：表8-258-25事件代碼：事件代碼： eractivechan

38、ge command1.click command1.click command2.click command2.click例例8-12 設(shè)計(jì)一個(gè)工資調(diào)整表單，一次可以調(diào)整設(shè)計(jì)一個(gè)工資調(diào)整表單，一次可以調(diào)整多個(gè)教師的工資多個(gè)教師的工資。演示演示 圖圖8-528-52屬性：屬性： 表表8-26 list18-26 list1的的multiselectmultiselect屬性屬性. .Command1.click(Command1.click(添加）添加）forfor i=1 to thisform.list1.listcount i=1 to thisform.list1.listcount

39、if thisform.list1. if thisform.list1.selected(i)selected(i)=.t.=.t. thisform.list2. thisform.list2.additemadditem(thisform.list1.list(i)(thisform.list1.list(i) mand2.enabled=.t. mand2.enabled=.t. endif endifendfor endfor 第第i個(gè)列表項(xiàng)選中與個(gè)列表項(xiàng)選中與否，選中則屬性值否，選中則屬性值為為.t.8.2.11 計(jì)時(shí)器控件計(jì)時(shí)器控件(Timer)功用：功用：利用系統(tǒng)時(shí)鐘來(lái)控制某些

40、具有規(guī)利用系統(tǒng)時(shí)鐘來(lái)控制某些具有規(guī)律性的周期任務(wù)的定時(shí)操作律性的周期任務(wù)的定時(shí)操作. .說(shuō)明：說(shuō)明：TimerTimer控件在運(yùn)行時(shí)不可見(jiàn)。控件在運(yùn)行時(shí)不可見(jiàn)。主要屬性：主要屬性： name : (Timer1 Timer2)name : (Timer1 Timer2) Enabled: Enabled:控制計(jì)時(shí)器是否進(jìn)行計(jì)時(shí)控制計(jì)時(shí)器是否進(jìn)行計(jì)時(shí) IntervalInterval: : 定義兩次記時(shí)器事件觸發(fā)定義兩次記時(shí)器事件觸發(fā)的時(shí)間間隔的時(shí)間間隔( (單位：?jiǎn)挝唬汉撩牒撩?. ).事件：事件： timer timer ( (記時(shí)器事件記時(shí)器事件). ). 即：利用系統(tǒng)時(shí)鐘計(jì)時(shí)，每隔規(guī)定的

41、即：利用系統(tǒng)時(shí)鐘計(jì)時(shí)，每隔規(guī)定的時(shí)間時(shí)間(interval)(interval)系統(tǒng)便自動(dòng)去執(zhí)行一系統(tǒng)便自動(dòng)去執(zhí)行一次次TimerTimer事件代碼事件代碼例：例：8-138-13 P281 P281字從小變大字從小變大, ,修改修改fontsizefontsize屬性，顏色屬性，顏色紅黑交替變化，紅黑交替變化，forecolorforecolor屬性。屬性。字從右向左移，修改標(biāo)簽的字從右向左移，修改標(biāo)簽的leftleft屬性屬性( (減減) )修改：如何加快移動(dòng)速度修改：如何加快移動(dòng)速度例例 8-14 8-14 設(shè)計(jì)一個(gè)顯示計(jì)算機(jī)系統(tǒng)時(shí)設(shè)計(jì)一個(gè)顯示計(jì)算機(jī)系統(tǒng)時(shí)間的表單。單擊間的表單。單擊“暫

42、停暫停”，暫停時(shí)間，暫停時(shí)間顯示；單擊顯示；單擊“繼續(xù)繼續(xù)”，恢復(fù)時(shí)間顯示。，恢復(fù)時(shí)間顯示。演示演示屬性：屬性：Timer1Timer1的的intervalinterval屬性屬性事件：各命令按鈕的事件：各命令按鈕的clickclick事件事件8.2.12 圖像控件(Image)功用功用: : 可以通過(guò)該控件顯示圖片可以通過(guò)該控件顯示圖片主要屬性：主要屬性：name :( image1 image2)name :( image1 image2)picturepicture: : 顯示的圖片文件顯示的圖片文件stretch: stretch: 圖片的顯示方式，以下三種圖片的顯示方式，以下三種 0

43、0將圖像的超出部分裁剪掉將圖像的超出部分裁剪掉 11等比例填充等比例填充 22變比例填充變比例填充例例8-158-15設(shè)計(jì)一個(gè)以不同顯示方式顯示圖片的設(shè)計(jì)一個(gè)以不同顯示方式顯示圖片的表單表單 演示演示 屬性屬性：P286P286image1image1圖像控件圖像控件: picture: picture、stretchstretchoptiongroup1optiongroup1選項(xiàng)按鈕組：選項(xiàng)按鈕組：buttoncountbuttoncount屬性、屬性、valuevalue屬性屬性各選項(xiàng)按鈕的：各選項(xiàng)按鈕的：captioncaption屬性屬性事件：事件：optiongroup1optio

44、ngroup1的的clickclick事件事件8.2.13 表格(Grid)功能：功能：將數(shù)據(jù)以表格形式顯示在表單上。在將數(shù)據(jù)以表格形式顯示在表單上。在創(chuàng)建一對(duì)多表單時(shí)通過(guò)，表格控件顯示子表創(chuàng)建一對(duì)多表單時(shí)通過(guò)，表格控件顯示子表記錄。記錄。表格是一個(gè)表格是一個(gè)容器容器, ,層次關(guān)系如下：層次關(guān)系如下：表格表格(grid)(grid)列列(column) (column) 各列標(biāo)題各列標(biāo)題(header)(header)和列控件和列控件表格的主要屬性：表格的主要屬性： RecordSourceRecordSource: :表格的數(shù)據(jù)源表格的數(shù)據(jù)源 RecordSourceTypeRecordSo

45、urceType: :數(shù)據(jù)源類型數(shù)據(jù)源類型(0(0表表, ,1 1別名別名,4 SQL,4 SQL) ) ColumnCount: ColumnCount: 表格列數(shù)表格列數(shù)l列列(column)(column)的主要屬性的主要屬性: : controlsourcecontrolsource列的數(shù)據(jù)源（綁定的字段）列的數(shù)據(jù)源（綁定的字段）l列標(biāo)題列標(biāo)題(header)(header)的主要屬性的主要屬性: : caption caption屬性屬性三種創(chuàng)建表格的方法三種創(chuàng)建表格的方法1.1.表格生成器表格生成器( (表中的數(shù)據(jù)只來(lái)源于一個(gè)表表中的數(shù)據(jù)只來(lái)源于一個(gè)表的情況的情況) )2. 2.

46、手動(dòng)畫(huà)表格手動(dòng)畫(huà)表格 表格屬性設(shè)置表格屬性設(shè)置: : 列列column: controlsourcecolumn: controlsource 列標(biāo)題列標(biāo)題header: captionheader: caption3.3.從數(shù)據(jù)環(huán)境拖向表單從數(shù)據(jù)環(huán)境拖向表單形成表格形成表格 觀察觀察recordsourcerecordsource和和recordsourcetyperecordsourcetype 寬度調(diào)整寬度調(diào)整( (容器對(duì)象的編輯容器對(duì)象的編輯) ) 列的刪除列的刪除例例8-168-16 設(shè)計(jì)一個(gè)如圖設(shè)計(jì)一個(gè)如圖8-668-66所示的學(xué)所示的學(xué)生成績(jī)查詢表單。利用表格生成器。生成績(jī)查詢表

47、單。利用表格生成器。 表單程序演示表單程序演示 1.1.打開(kāi)數(shù)據(jù)環(huán)境打開(kāi)數(shù)據(jù)環(huán)境, ,添加兩表添加兩表( (先先添加一對(duì)多關(guān)添加一對(duì)多關(guān)系的系的一方，即父表一方，即父表學(xué)生學(xué)生, , 再添子表選課再添子表選課), ),設(shè)置表間關(guān)聯(lián)。設(shè)置表間關(guān)聯(lián)。2.2.添加控件添加控件, ,設(shè)置控件屬性設(shè)置控件屬性組 合 框組 合 框 : : r o w s o u r c e r o w s o u r c e rowsourceTyperowsourceType表格表格: : 用生成器用生成器說(shuō)明：組合框中選擇列表項(xiàng)時(shí)，表記錄指說(shuō)明：組合框中選擇列表項(xiàng)時(shí)，表記錄指定會(huì)自動(dòng)移動(dòng)到對(duì)應(yīng)記錄上定會(huì)自動(dòng)移動(dòng)到對(duì)應(yīng)

48、記錄上。3. 3. 編寫(xiě)編寫(xiě)grid1.initgrid1.init事件代碼事件代碼說(shuō)明說(shuō)明: : n若若表格顯示的數(shù)據(jù)列來(lái)源于表格顯示的數(shù)據(jù)列來(lái)源于多個(gè)表多個(gè)表時(shí)時(shí),recordsourcetype,recordsourcetype屬性一般屬性一般設(shè)置為設(shè)置為4 4 SQLSQL( (見(jiàn)圖見(jiàn)圖8-72)8-72)1.1.若表格顯示數(shù)據(jù)列來(lái)源于個(gè)表若表格顯示數(shù)據(jù)列來(lái)源于個(gè)表, ,則則recordsourcetyperecordsourcetype屬性一般設(shè)屬性一般設(shè)置為置為1 1 別名別名例例 8-17 8-17 設(shè)計(jì)一個(gè)如圖設(shè)計(jì)一個(gè)如圖8-728-72所示的成績(jī)查詢表單。所示的成績(jī)查詢表單。

49、添加控件，設(shè)置屬性添加控件，設(shè)置屬性. . 表表3-1 3-1 手動(dòng)設(shè)置表格屬性手動(dòng)設(shè)置表格屬性說(shuō)明：說(shuō)明：sqlsql所用到的表可不必事先放入數(shù)據(jù)環(huán)境中。所用到的表可不必事先放入數(shù)據(jù)環(huán)境中。事件代碼：事件代碼：text1.lostfocustext1.lostfocusthisform.grid1.rthisform.grid1.recordsourcetypeecordsourcetype=4=4thisform.grid1.thisform.grid1.recordsourcerecordsource= = select select 課程名課程名, ,成績(jī)成績(jī); ; from from

50、 學(xué)生學(xué)生 inner join inner join 選課選課 inner join inner join 課程課程; ; on on 選課選課. .課程號(hào)課程號(hào)= =課程課程. .課程號(hào)課程號(hào); ; on on 選課選課. .學(xué)號(hào)學(xué)號(hào)= =學(xué)生學(xué)生. .學(xué)號(hào)學(xué)號(hào); ; where where 姓名姓名=alltrim(thisform.text1.value);=alltrim(thisform.text1.value); into cursor temp into cursor temp 例例8-18 8-18 設(shè)計(jì)一個(gè)學(xué)生成績(jī)查詢表單設(shè)計(jì)一個(gè)學(xué)生成績(jī)查詢表單數(shù)據(jù)環(huán)境：學(xué)生、選課數(shù)據(jù)環(huán)境

51、：學(xué)生、選課 ( (建立兩表關(guān)聯(lián)建立兩表關(guān)聯(lián)) )從數(shù)據(jù)環(huán)境中將表的標(biāo)題欄拖向表單，從數(shù)據(jù)環(huán)境中將表的標(biāo)題欄拖向表單，自動(dòng)生成表格，右擊表格，選擇自動(dòng)生成表格，右擊表格，選擇“編編輯輯”，選中不要的列，按，選中不要的列，按“delete”delete”鍵刪除。鍵刪除。操作演示操作演示8.2.14 頁(yè)框（頁(yè)框（PageFrame）頁(yè)框?qū)嶋H上是選項(xiàng)卡界面頁(yè)框?qū)嶋H上是選項(xiàng)卡界面, , 一個(gè)頁(yè)框可以一個(gè)頁(yè)框可以有兩個(gè)以上的頁(yè)面，是有兩個(gè)以上的頁(yè)面，是容器類控件容器類控件，直，直接下級(jí)對(duì)象是頁(yè)面接下級(jí)對(duì)象是頁(yè)面(page)(page)主要屬性：主要屬性：名稱：名稱：namename（PageFrame1

52、PageFrame1）頁(yè)框頁(yè)面數(shù)頁(yè)框頁(yè)面數(shù): : PageCountPageCount頁(yè)框的每一頁(yè)的標(biāo)題：頁(yè)框的每一頁(yè)的標(biāo)題：CaptionCaption例：例：8-19 P2928-19 P292 表單程序演示表單程序演示 (1) (1)向表單添加頁(yè)框控件并設(shè)置屬性：向表單添加頁(yè)框控件并設(shè)置屬性： pageCount: 3pageCount: 3及各頁(yè)的及各頁(yè)的captioncaption屬性值屬性值 (2)(2)數(shù)據(jù)環(huán)境：教師、授課、課程數(shù)據(jù)環(huán)境：教師、授課、課程(3)(3)右擊右擊頁(yè)框頁(yè)框選擇選擇“編輯編輯”命令，命令，選中第一個(gè)頁(yè)，從數(shù)據(jù)環(huán)境中將選中第一個(gè)頁(yè)，從數(shù)據(jù)環(huán)境中將“教教師師”

53、拖向第一頁(yè)拖向第一頁(yè). .注意：注意：容器類控件的編輯容器類控件的編輯8.2.15 命令按鈕組命令按鈕組(CommandGroup)將多個(gè)命令按鈕組合在一起，作為一控件，將多個(gè)命令按鈕組合在一起，作為一控件，即即“命令按鈕組命令按鈕組”控件，該控件是控件，該控件是容器類容器類控件，它的直接下級(jí)對(duì)象是命令按鈕控件，它的直接下級(jí)對(duì)象是命令按鈕. . command1 command1Commandgroup1Commandgroup1 command2 command2 name: commandgroup1name: commandgroup1ButtonCountButtonCount：命令按鈕的個(gè)數(shù)：命令按鈕的個(gè)數(shù)A.A. 命令按鈕組的編輯命令按鈕組的編輯B.B.命令按鈕組生成器命令按鈕組生成器 的使用的使用例：例：8-208-20 表單程序演示表單程序演示 向數(shù)據(jù)環(huán)境添加表向數(shù)據(jù)環(huán)境添加表( (學(xué)生學(xué)生.dbf).dbf)直接把需要的顯示的字段從數(shù)據(jù)環(huán)直接把需要的顯示的字段從數(shù)據(jù)環(huán)境中境中拖向表單拖向表單. . 將文本框設(shè)為將文本框設(shè)為只讀只讀再添加命令按鈕組，設(shè)置相關(guān)屬性。再添加命令按鈕組，設(shè)置相關(guān)屬性?；蚴褂妹畎粹o組生成器或使用命令按鈕組生成器編寫(xiě)命令按鈕的編寫(xiě)命令