【導(dǎo)讀】客觀世界里的任何實(shí)體都可以被看作是對(duì)象。對(duì)象可以是具體的物，也可以指某些概念?，F(xiàn)有類的子類，而把現(xiàn)有類稱為新類的父類。存放在某個(gè)類庫中。用戶可以基于基類生成。VisualFoxPro中的類一般可分為兩種類型：容器類和控件類。命令按鈕：mand1和mand2，label1是表單form1上的一個(gè)標(biāo)簽控件。事件作用于對(duì)象，對(duì)象識(shí)別事。Rightclick：鼠標(biāo)右鍵單擊對(duì)象時(shí)發(fā)生的事件。LostFocus：對(duì)象失去焦點(diǎn)時(shí)發(fā)生的事件。InteractiveChange：以交互方式改變對(duì)象的值時(shí)發(fā)生的事件。用程序界面的最主要的工具之一。在項(xiàng)目管理器中創(chuàng)建的表單自動(dòng)隸屬于。創(chuàng)建表單一般有兩種途徑：

　　

【正文】 rol：指定列對(duì)象中顯示和接收數(shù)據(jù)的控件 . Sparse：用于確定 CurrentControl屬性影響列中的所有單元格還是只影響活動(dòng)單元格 . 注意： 設(shè)計(jì)時(shí)要設(shè)置列對(duì)象的屬性 ， 首先得選擇列對(duì)象 ， 選擇列對(duì)象有兩種方法： ① 從屬性窗口的對(duì)象列表中選擇相應(yīng)列 ， ② 右擊表格 ， 在彈出的快捷菜單中選擇 【 編輯 】 命令 ， 這時(shí)表格進(jìn)入編輯狀態(tài) （ 表格的周圍有一個(gè)粗框 ） ， 用戶可用鼠標(biāo)單擊選擇列對(duì)象 。 68 表格 (Grid)控件 4． 常用的標(biāo)頭 （ Header） 屬性 列標(biāo)頭也是一個(gè)對(duì)象 ， 有它自己的屬性 、 方法和事件 ，設(shè)計(jì)時(shí)要設(shè)置標(biāo)頭對(duì)象的屬性 ， 首先得選擇標(biāo)頭對(duì)象 ， 選擇標(biāo)頭對(duì)象的方法與選擇列對(duì)象的方法類似 。 Caption屬性：指定標(biāo)頭對(duì)象的標(biāo)題文本 ， 顯示于列頂部 。 默認(rèn)為對(duì)應(yīng)字段的字段名 。 Alignment屬性：指定標(biāo)題文本在對(duì)象中顯示的對(duì)齊方式。 69 表格 (Grid)控件 5． 調(diào)整表格的行高和列寬 一旦指定了表格的列的具體數(shù)目 ， 就可以有兩種方法來調(diào)整表格的行高和列寬 。 ① 設(shè)置表格的 HeaderHeight和 RowHeight屬性調(diào)整行高；設(shè)置列對(duì)象的 Width屬性調(diào)整列寬 。 ② 讓表格處于編輯狀態(tài)下，將鼠標(biāo)指針置于表格兩列的標(biāo)頭之間，這時(shí)，鼠標(biāo)指針變?yōu)樗诫p箭頭的形狀， 拖動(dòng)鼠標(biāo)，調(diào)整列至所需要的寬度； 將鼠標(biāo)置于表格左側(cè)的第一個(gè)按鈕和第二個(gè)按鈕之間，這時(shí)，鼠標(biāo)指針變成垂直雙箭頭的形狀， 拖動(dòng)鼠標(biāo)，調(diào)整行至所需要的高度。 70 表格 (Grid)控件 6． 使用表格生成器設(shè)計(jì)表格 用鼠標(biāo)左鍵右擊表格，在彈出的快捷菜單中選擇 【 生成器 】 命令，打開“表格生成器”對(duì)話框，如圖所示。 “表格項(xiàng)”選項(xiàng)卡：用于設(shè)置表格內(nèi)顯示字段 “樣式”選項(xiàng)卡：指定表格的樣式 “布局”選項(xiàng)卡：調(diào)整行高、列寬；設(shè)置列標(biāo)題；選擇控件類型 “關(guān)系”選項(xiàng)卡：設(shè)置一個(gè)一對(duì)多關(guān)系，指明父表中的關(guān)鍵字段與子表中的相關(guān)索引 71 表格 (Grid)控件 【 例 】 設(shè)計(jì)如圖所示表單 ， 要求按系瀏覽學(xué)生信息 。 72 表格 (Grid)控件 ① 設(shè)計(jì)數(shù)據(jù)環(huán)境：把系別表 （ DEP） 和學(xué)生信息表（ STUD） 加入數(shù)據(jù)環(huán)境 ， 并在系別代號(hào)之間建立關(guān)系 。 ② 打開表格生成器 ， 在 “ 表格項(xiàng) ” 選項(xiàng)卡中設(shè)置要顯示的字段 ， 在 “ 關(guān)系 ” 選項(xiàng)卡設(shè)置 “ 父表中的關(guān)鍵字段 ” 為： ， “ 子表中的相關(guān)素引 ” 為：系別代號(hào) 。 ③ 組合框?qū)傩栽O(shè)置： RecordSourceType： 6_字段 ，RowSource： 。 ④ 表格屬性設(shè)置： LINKMASTR： DEP， CHILDORDER：系別代號(hào) 。 運(yùn)行表單時(shí)，在列表框中選擇一個(gè)系，表格中就只顯示該系的學(xué)生信息。 73 自定義類的創(chuàng)建與使用 將表單和控件保存為類 （ 1） 選擇 【 文件 】 |【 另存為類 】 命令 ， 打開如圖所示的 “ 另存為類 ” 對(duì)話框 2） 在 “ 另存為類 ” 對(duì)話框中選擇 “ 當(dāng)前表單 ” 或 “ 選定控件 。在 “ 類名 ” 框中輸入類的名稱 ， 在 “ 文件 ” 框中輸入保存類的文件名 （ 類庫名 ） ， 單擊 “ 確定 ” 按鈕 。 74 自定義類的創(chuàng)建與使用 用類設(shè)計(jì)器創(chuàng)建類 1． 啟動(dòng)類設(shè)計(jì)器 可以在系統(tǒng)菜單中選擇 【 文件 】 |【 新建 】 命令 ， 在新建對(duì)話框中選擇 “ 類 ” ， 將打開 “ 新建類 ” 對(duì)話框 ， 如圖所示 。 ① 在 “ 類名 ” 文本框中輸入自定義類名 ， 如 newclass ② 在 “ 派生于 ” 組合框中輸入父類的名字 。 ③ 在 “ 存儲(chǔ)于 ” 文本框中輸入已有的或新建的類庫名 ， 如Myclass。 ④ 單擊“確定”按鈕 75 自定義類的創(chuàng)建與使用 2． 在類設(shè)計(jì)器中設(shè)計(jì)類 類設(shè)計(jì)器窗口類似于表單設(shè)計(jì)器窗口 ， 也有 “ 表單設(shè)計(jì)器 ” 工具欄 ， “ 表單控件 ” 工具欄 ， “ 屬性 ”窗口 ， 而且所有的操作方式與表單的相應(yīng)操作完全相同 。 76 自定義類的創(chuàng)建與使用 【 例 】 創(chuàng)建工具欄子類 ① 進(jìn)入項(xiàng)目管理器 ， 在 “ 類 ” 選項(xiàng)卡中單擊 “ 新建 ” 按鈕 。 在“ 新建類 ” 對(duì)話框中輸入類名 “ MyTool”， 在 “ 派生于 ” 組合框中選擇基類 “ ToolBar”， 并保存在自定義類庫 MyClass中 。 ② 在“類設(shè)計(jì)器”中，從控件工具欄中把三個(gè)命令按鈕和一個(gè)組合框添加到類設(shè)計(jì)窗口中，并在控件之間插入“分隔符”控件，如圖所示。 77 自定義類的創(chuàng)建與使用 ③ 設(shè)置工具欄 “ MyTool”的 Caption屬性為： “ 工具欄 ” ；三個(gè)按鈕的 CAPTION屬性一般設(shè)置為空 （ 默認(rèn)值 ） ，但為了讓用戶在把鼠標(biāo)指到按鈕上時(shí)顯示按鈕的功能 ， 需設(shè)置按鈕的 ToolTipText屬性為相應(yīng)提示信息 ，如本例設(shè)置三個(gè)按鈕的 ToolTipText分別為： “ 打開數(shù)據(jù)庫 ” 、 “ 打開學(xué)生信息錄入表單 ” 、 “ 打開報(bào)表控制表單 ” 。 ④ 編寫有關(guān)代碼：假設(shè)第一個(gè)按鈕用于打開 STUDENT數(shù)據(jù)庫 ， 可在其 CLICK事件中添加如下代碼： OPEN DATABASE STUDENT 用戶可根據(jù)需要編寫其它控件的代碼 。 ⑤ 保存子類：按 CTRL+W或關(guān)閉類設(shè)計(jì)器 ， 即可保存子類 。 78 自定義類的創(chuàng)建與使用 在表單集中添加自定義工具欄 選建一個(gè)表單 Form ， 并在“表單”菜單中執(zhí)行“創(chuàng)建表單集”命令 ， 于是就生成只有一個(gè)表單的表單集 FormSet1。 單擊表單工具欄中“查看類”按鈕，如果我們自定義的類“ MYCLASS”不在列表中，單擊“添加”，在打開對(duì)話框中選擇“ MyClass”類庫，如果“ MYCLASS”已在類列表中，單擊“ MyCLASS”，這時(shí)表單工具欄將列出“ MyCLASS”類庫中所有類，單擊“ MYTOOL”，然后在表單中單擊鼠標(biāo)，就可將其添加到表單集 FormSet1中。 79 數(shù)據(jù)環(huán)境 1． 打開數(shù)據(jù)環(huán)境設(shè)計(jì)器 表單設(shè)計(jì)器環(huán)境下 ， 單擊 “ 表單設(shè)計(jì)器 ” 工具欄上的“ 數(shù)據(jù)環(huán)境 ” 按鈕 ， 或選擇 【 顯示 】 |【 數(shù)據(jù)環(huán)境 】命令 ， 即可打開 “ 數(shù)據(jù)環(huán)境設(shè)計(jì)器 ” 窗口 ， 此時(shí) ，系統(tǒng)菜單欄上將出現(xiàn) “ 數(shù)據(jù)環(huán)境 ” 菜單 。 2． 數(shù)據(jù)環(huán)境的常用屬性 常 用 的 兩 個(gè) 數(shù) 據(jù) 環(huán) 境 屬 性 是 AutoOpenTables 和AutoCloseTables 80 數(shù)據(jù)環(huán)境 3．向數(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ì)器窗口 ” ， 然后在彈出的快捷菜單中選擇 【 添加 】 命令 ， 打開 “ 添加表或視圖 ” 對(duì)話框 ， 如圖所示 。 如果數(shù)據(jù)環(huán)境原來是空的 ， 那么在打開數(shù)據(jù)環(huán)境設(shè)計(jì)器時(shí) ， 該對(duì)話框就會(huì)自動(dòng)出現(xiàn) 。 選擇所需表，單擊 “ 添加 ” 81 數(shù)據(jù)環(huán)境 4． 從數(shù)據(jù)環(huán)境中移去表或視圖 在“數(shù)據(jù)環(huán)境設(shè)計(jì)器”窗口中，選擇要移去的表或視圖，在系統(tǒng)菜單中選擇 【 數(shù)據(jù)環(huán)境 】 |【 移去 】 命令。也可以用鼠標(biāo)右鍵單擊要移去的表或視圖，然后在彈出的快捷菜單中選擇【 移去 】 命令。 5． 在數(shù)據(jù)環(huán)境中設(shè)置關(guān)系 設(shè)置關(guān)系的方法為：將主表的某個(gè)字段 （ 作為關(guān)聯(lián)表達(dá)式 ） 拖曳到子表的相匹配的索引標(biāo)記上既可 。 如果子表上沒有與主表字段相匹配的索引 ， 也可以將主表字段拖動(dòng)到子表的某個(gè)字段上 ， 這時(shí)應(yīng)根據(jù)系統(tǒng)提示確認(rèn)創(chuàng)建索引 82 數(shù)據(jù)環(huán)境 常用的關(guān)系屬性有： ● RelationalExpr：用于指定基于主表的關(guān)聯(lián)表達(dá)式 。 ● ParentAlias：用于指明主表的別名 。 ● ChildAlias：用于指明子表的別名 。 ● ChildOrder：用于指定與關(guān)聯(lián)表達(dá)式相匹配的索引 。 ● OneToMany：用于指明關(guān)系是否為一對(duì)多關(guān)系 ， 該屬性默認(rèn)為 “ .F.”， 如果關(guān)系為 “ 一對(duì)多關(guān)系 ” ， 該屬性一定要設(shè)置為 “ .T.”。