《Visual FoxPro程序設(shè)計(jì)》課件第7章表單設(shè)計(jì)與應(yīng)用

本章主要內(nèi)容7.1面向?qū)ο蟮母拍?.2VISUALFOXPRO的類7.3創(chuàng)建和管理表單7.4常用表單控件7.1面向?qū)ο蟮母拍?、對象（Object）客觀世界里的任何實(shí)體都可以被看作是對象。對象可以是具體的物，也可以指某些概念。從編程的角度來看，對象是一種將數(shù)據(jù)和操作過程結(jié)合在一起的數(shù)據(jù)結(jié)構(gòu)，或者是一種具有屬性（數(shù)據(jù)）和方法（過程和函數(shù)）的集合體。事實(shí)上程序中的對象就是對客觀世界中對象的一種抽象描述（1）對象屬性：屬性用來表示對象的狀態(tài)。（2）對象方法：對象方法是描述對象行為的過程。

7.2VISUALFOXPRO的類1．類類是對一類相似對象的性質(zhì)描述，這些對象具有相同種類的屬性以及方法

2．子類與繼承

在面向?qū)ο蟮姆椒ɡ?，繼承是指在基于現(xiàn)有的類創(chuàng)建新類時(shí)，新類繼承了現(xiàn)有類里的方法和屬性。此外，可以為新類添加新的方法和屬性。我們把新類稱為現(xiàn)有類的子類，而把現(xiàn)有類稱為新類的父類。

一個子類的成員一般包括：（1）從其父類繼承的屬性和方法。（2）由子類自己定義的屬性和方法。3.VisualFoxPro基類

VisualFoxPro基類是系統(tǒng)本身內(nèi)含的，并不存放在某個類庫中。用戶可以基于基類生成所需要的對象，也可以擴(kuò)展基類創(chuàng)建自己的子類VisualFoxpro基類列表類名含義類名含義ActiveDoc活動文檔Label標(biāo)簽CheckBox復(fù)選框Line線條Column（表格）列Listbox列表框ComboBox組合框OlecontrolOLE容器控件CommandButton命令按鈕OleboundcontrolOLE綁定控件CommandGroup命令按鈕組OptionButton選項(xiàng)按鈕Container容器Optiongroup選項(xiàng)按鈕組Contorl控件Page頁Custom定制PageFrame頁框EditBox編輯框ProjectHook項(xiàng)目掛鉤Form表單Separator分隔符FormSet表單集Shape圖形Grid表格Spinner微調(diào)控件Header（列）標(biāo)頭TextBox文本框HyperLink超級鏈接Timer定時(shí)器Image圖象ToolBar工具欄7.3創(chuàng)建和管理表單

表單(Form)是VisualFoxPro提供的用于建立應(yīng)用程序界面的最主要的工具之一。表單相當(dāng)于WINDOWS應(yīng)用程序的窗口表單可以屬于某個項(xiàng)目，也可以游離于任何項(xiàng)目之外，它是一個特殊的磁盤文件，其擴(kuò)展名為.scx。在項(xiàng)目管理器中創(chuàng)建的表單自動隸屬于該項(xiàng)目。創(chuàng)建表單一般有兩種途徑：使用表單向?qū)?chuàng)建簡易的數(shù)據(jù)表單；使用表單設(shè)計(jì)器創(chuàng)建或修改任何形式的表單。1、使用表單向?qū)颖韱蜗驅(qū)в幸韵滤姆N途徑：（1）打開“項(xiàng)目管理器”，選擇“文檔”選項(xiàng)卡，從中選擇“表單”。然后單擊“新建”按鈕。在彈出的“新建表單”對話框中單擊“表單向?qū)А卑粹o。（2）在系統(tǒng)菜單中選擇【文件】|【新建】命令，或者單擊工具欄上的“新建”按鈕，打開“新建”對話框，在文件類型欄中選擇“表單”。然后單擊“向?qū)А卑粹o。（3）在系統(tǒng)菜單中選擇【工具】|【向?qū)А縷【表單】命令。（4）直接單擊常用工具欄上的“表單向?qū)А眻D標(biāo)按鈕。按步驟依照“表單向?qū)А蓖瓿梢粚Χ啾肀韱蔚脑O(shè)計(jì)2、使用表單設(shè)計(jì)器啟動表單設(shè)計(jì)器有多種方法：●菜單方法：若是新建表單，在系統(tǒng)菜單中選擇【文件】|【新建】，在文件類型對話框中選擇“表單”，單擊“新建文件”按鈕；若是修改表單，則單擊【文件】|【打開】，在打開對話框中選擇要修改的表單文件名，單擊“打開”按鈕?！衩罘椒ǎ涸贑OMMAND窗口輸入如下命令：

CREATEFORM<文件名>MODIFYFORM<文件名>●在項(xiàng)目管理器中，先選擇文檔標(biāo)簽，然后選擇表單，單擊新建按鈕。若是修改表單，選擇要修改的表單，單擊“修改”按鈕。3、表單設(shè)計(jì)器環(huán)境介紹（1）設(shè)計(jì)器窗口

“表單設(shè)計(jì)器”窗口內(nèi)包含正在設(shè)計(jì)的表單。用戶可在表單窗口中可視化地添加和修改控件、改變控件布局，表單窗口只能在“表單設(shè)計(jì)器”窗口內(nèi)移動。以新建方式啟動表單設(shè)計(jì)器時(shí)，系統(tǒng)將默認(rèn)為用戶創(chuàng)建一個空白表單，如圖左側(cè)部分。（2）屬性窗口設(shè)計(jì)表單的絕大多數(shù)工作都是在屬性窗口中完成的，因此用戶必須熟悉屬性窗口的用法。如果在表單設(shè)計(jì)器中沒有出現(xiàn)屬性窗口，可在系統(tǒng)菜單中單擊【顯示】|【屬性】，屬性窗口如圖所示。頁框選項(xiàng)卡“對象”下拉列表框圖屬性設(shè)置框（3）表單控件工具欄

設(shè)計(jì)表單的主要任務(wù)就是利用“表單控件”設(shè)計(jì)交互式用戶界面?！氨韱慰丶惫ぞ邫谑潜韱卧O(shè)計(jì)的主要工具。默認(rèn)包含21個控件、4個輔助按鈕，如圖所示

（4）表單設(shè)計(jì)器工具欄打開“表單設(shè)計(jì)器”時(shí)，主窗口中會自動出現(xiàn)“表單設(shè)計(jì)器”工具欄4、數(shù)據(jù)環(huán)境1)打開數(shù)據(jù)環(huán)境設(shè)計(jì)器2)數(shù)據(jù)環(huán)境的常用屬性常用的兩個數(shù)據(jù)環(huán)境屬性是AutoOpenTables和AutoCloseTables5、向數(shù)據(jù)環(huán)境添加表或視圖在數(shù)據(jù)環(huán)境設(shè)計(jì)器環(huán)境下，按下列方法向數(shù)據(jù)環(huán)境添加表或視圖：在系統(tǒng)菜單中選擇【數(shù)據(jù)環(huán)境】|【添加】命令，或右鍵單擊“數(shù)據(jù)環(huán)境設(shè)計(jì)器窗口”，然后在彈出的快捷菜單中選擇【添加】命令，打開“添加表或視圖”對話框，如圖所示。如果數(shù)據(jù)環(huán)境原來是空的，那么在打開數(shù)據(jù)環(huán)境設(shè)計(jì)器時(shí)，該對話框就會自動出現(xiàn)。

選擇所需表，單擊“添加”6、常用的關(guān)系屬性有：RelationalExpr：用于指定基于主表的關(guān)聯(lián)表達(dá)式。ParentAlias：用于指明主表的別名。ChildAlias：用于指明子表的別名。ChildOrder：用于指定與關(guān)聯(lián)表達(dá)式相匹配的索引。OneToMany：用于指明關(guān)系是否為一對多關(guān)系，該屬性默認(rèn)為“.F.”，如果關(guān)系為“一對多關(guān)系”，該屬性一定要設(shè)置為“.T.”。7、表單常用方法（1）Relase方法：將表單從內(nèi)存中釋放

ThisForm.Release（2）Refresh方法：刷新表單（3）Show方法：顯示表單（4）Hide方法：隱藏表單8、表單常用事件（1）Init事件：在表單創(chuàng)建時(shí)引發(fā).（2）Destroy事件：在表單對象釋放時(shí)引發(fā)。（3）RightClick事件：用鼠標(biāo)右鍵單擊表單時(shí)引發(fā).9、添加新的屬性和方法1）創(chuàng)建新屬性向表單添加新屬性的步驟如下：（1）在“名稱”框中輸入屬性名稱（2）有選擇地在“說明”框中輸入新建屬性的說明信息10、運(yùn)行表單在設(shè)計(jì)時(shí)可采用以下方法運(yùn)行表單文件：（1）在項(xiàng)目管理器窗口中，選擇要運(yùn)行的表單，然后單擊“運(yùn)行”按鈕。（2）在表單設(shè)計(jì)器窗口中，在系統(tǒng)菜單中選擇【表單】|【執(zhí)行表單】命令，或單擊常用工具欄上的“運(yùn)行”按鈕。（3）在系統(tǒng)菜單中選擇【程序】|【運(yùn)行】命令，打開“運(yùn)行”對話（4）在命令窗口輸入命令：DOFORM<表單文件名>。11、常用控件的公共屬性name：控件的名稱，它是代碼中訪問控件的標(biāo)識（表單或表單集除外）。Fontname：字體名。Fontbold：字體樣式為粗體。Fontsize：字體大小。Fontitalic：字體樣式為斜體。Forecolor：前景色。Height：控件的高度Width：控件的寬度?？丶母叨群涂丶膶挾?，也可在設(shè)計(jì)時(shí)通過鼠標(biāo)拖曳進(jìn)行可視化調(diào)整。Visible：控件是否顯示。Enable：控件運(yùn)行時(shí)是否有效。如果為.T.，則表示控件有效，否則運(yùn)行時(shí)控件不可使用。7.4常用表單控件一、標(biāo)簽（Label）控件1．標(biāo)簽控件的功能標(biāo)簽主要用于顯示固定的文本信息。2．標(biāo)簽控件常用屬性caption：指定標(biāo)簽的顯示文本?？梢栽谠O(shè)計(jì)時(shí)設(shè)置，也可以在程序運(yùn)時(shí)設(shè)置或修改。forecolor：設(shè)置標(biāo)題的字體顏色。backstyle：設(shè)置標(biāo)簽的背景是否透明，0透明，1不透明，默認(rèn)為不透明。name：標(biāo)簽對象的名稱，是程序中訪問標(biāo)簽對象的標(biāo)識。Alignment：指定標(biāo)題控件中顯示的對齊方式。7.4常用表單控件二、命令按鈕（CommandButton）控件1．命令按鈕控件功能命令按鈕典型地用來啟動某個事件代碼、完成特定功能，如關(guān)閉表單、移動記錄指針、打印報(bào)表等2．命令按鈕控件常用屬性

Default：命令按鈕的Default屬性默認(rèn)值為.F.，Cancel：命令按鈕的Cancel屬性默認(rèn)值為.F.Caption：設(shè)置按鈕的標(biāo)題。Enable：確定按鈕是否有效，如果按鈕的屬性Enable為.F.，單擊該按鈕不會引發(fā)該按鈕的單擊事件。對命令按鈕的使用最重要的是編寫Click事件代碼。三、命令按鈕組（CommandGroup）控件1．命令按鈕組常用屬性Buttoncount：命令按鈕組中命令按鈕的數(shù)目。Value：默認(rèn)情況下，命令按鈕組中的各個按鈕被自動賦予了一個編號，如1，2，3，Buttons：用于存取命令按鈕組中每個命令按鈕的數(shù)組，代碼中可以通過該數(shù)組訪問命令按鈕組中的各個按鈕.

四、文本框（TextBox）控件1．文本框控件的功能：（1）用于顯示或接收單行文本信息（不設(shè)置ControlSource屬性），默認(rèn)輸入類型為字符型，最大長度為256個字符。（2）用于顯示或編輯對應(yīng)變量或字段的值（設(shè)置ControlSource屬性為已有變量或字段名）。2．文本框控件常用屬性ControlSource：設(shè)置文本框的數(shù)據(jù)來源。Value：保存文本框的當(dāng)前內(nèi)容，PassWordChar：設(shè)置輸入口令時(shí)顯示的字符。Readonly：確定文本框是否為只讀，為“.T.”時(shí)，文本框的值不可修改。六、編輯框（EditBox）控件1．編輯框控件的功能2．編輯框常用屬性ControlSource：設(shè)置編輯框的數(shù)據(jù)源，一般為數(shù)據(jù)表的備注字段。Value：保存編輯框中的內(nèi)容，可以通過該屬性來訪問編輯框中的內(nèi)容。SelText：返回用戶在編輯區(qū)內(nèi)選定的文本，如果沒有選定任何文本，則返回空串。SelLength：返回用戶在文本輸入?yún)^(qū)中所選定字符的數(shù)目。Readonly：確定用戶是否能修改編輯框中的內(nèi)容。

Scroolbars：指定編輯框是否具有滾動條，當(dāng)屬性值為０時(shí)，編輯框沒有滾動條，當(dāng)屬性值為２（默認(rèn)值）時(shí)，編輯框包含垂直滾動條。七、復(fù)選框(CheckBox)控件1．復(fù)選框的功能2．復(fù)選框常用屬性Value：用來指明復(fù)選框的當(dāng)前狀態(tài),如下表

ControlSource屬性：用于指定復(fù)選框的數(shù)據(jù)源

屬性值說明0或.F.（默認(rèn)值），未被選中1或.T.被選中>=2或null不確定，只在代碼中有效八、選項(xiàng)組(OptionGroup)控件1．選項(xiàng)組控件的功能2．選項(xiàng)組常用屬性

ButtonCount：指定選項(xiàng)組中選項(xiàng)按鈕的數(shù)目。

Value：用于指定選項(xiàng)組中哪個選項(xiàng)按鈕被選中。ControlSource：指定選項(xiàng)組數(shù)據(jù)源。

Buttons：用于存取選項(xiàng)組中每個選項(xiàng)的數(shù)組?！纠棵畎粹o組、選項(xiàng)組、復(fù)選框、編輯框應(yīng)用示例，按圖設(shè)計(jì)一個表單，要求：用戶單擊確定按鈕時(shí)，在編輯框中顯示用戶對選項(xiàng)組和復(fù)選框的選擇。并將表單保存為我的表單編寫事件代碼選擇命令按鈕組，在屬性窗口中雙擊“CLICKEVENT”屬性，系統(tǒng)會打開代碼編寫器，在代碼編寫器窗口為“CLICKEVENT”事件輸入如下代碼：ifmandgroup1.value=2thisform.releaseelsecstr="你所在城市"+chr(13);+thisform.optiongroup1.buttons[thisform.optiongroup1.value].caption+chr(13)cstr=cstr+"你的愛好"+chr(13)ifthisform.check1.value=1cstr=cstr+thisform.check1.captionendififthisform.check2.value=1cstr=cstr+thisform.check2.captionendififthisform.check3.value=1cstr=cstr+thisform.check3.captionendifthisform.edit1.value=cstrendif九、列表框（ListBox）控件1．列表框的功能列表框提供一組條目（數(shù)據(jù)項(xiàng)），用戶可以從中選擇一個或多個條目，一般情況下，列表框顯示其中的若干條目，用戶可以通過滾動條瀏覽其他條目。2．選項(xiàng)組常用屬性

RowSourceType屬性與RowSource屬性：RowSourceType屬性指明列表框數(shù)據(jù)源的類型，RowSource屬性指定列表框的數(shù)據(jù)源,兩者常用的搭配如表List屬性：用以存取列表框中數(shù)據(jù)條目的字符串?dāng)?shù)組。

ListCount屬性：列表框中數(shù)據(jù)條目的數(shù)目

ColumnCount屬性：指定列表框的列數(shù)

Value屬性：返回列表框中被選中的條目

ControlSource屬性：該屬性在列表框中的用法與在其他控件中的用法有所不同，在這里，用戶可以通過該屬性指定一個字段或變量用以保存用戶從列表框中選擇的結(jié)果

Selected屬性：該屬性是一個邏輯型數(shù)組，第N個數(shù)組元素代表第N個數(shù)據(jù)項(xiàng)是否為選定狀態(tài)

MultiSelect屬性：指定用戶能否在列表框控件內(nèi)進(jìn)行多重選定操作步驟：①按圖在表單中加入二個列表框、二個標(biāo)簽、二個命令按鈕。②在表單的INIT事件中加入如下代碼：thisform.list1.value=0thisform.list2.value=0opendatabasestudentusestudfori=1tofcount()thisform.list1.additem(fields(i))nextclosedatabase③在左箭頭按鈕（COMMAND1）的CLICK事件中加入如下代碼：thisform.list2.addlistitem(thisform.list1.listitem[thisform.list1.value])thisform.list1.removeitem[thisform.list1.value]右箭頭按鈕（COMMAND2）的CLICK事件代碼請用戶自己編寫。十、組合框(comboBox)控件組合框與列表框類似，也是用于提供一組條目供用戶從中選擇，組合框和和列表框的主要區(qū)別在于：（1）對于組合框來說，通常只有一個條目是可見的。用戶可以單擊組合框上的下拉箭頭按鈕打開條目列表，以便從中選擇。（2）組合框不提供多重選擇的功能，沒有Multi