【正文】 種表單設 計工具 — — 表單向?qū)?、 表單設計 器 和快速表 單 。在本實 驗 教材中， 我 們用表單 設 計器來創(chuàng)建 表單。 對象是構成程序的 基 本單位和 運 行實體， 就 是軟件中 所 看到的表 單 、文本框 、 按鈕、標 簽等 ， 可 放 在表單內(nèi) 的 對象 ， 如 按 鈕 、 文本 框 等常被稱 為 控件 。 常 用 的控件有 組 合框 、 標 簽 、 文本框、 列 表框、形 狀 、復選框 、 線條、圖 像 、命令按 鈕 、編輯框 等 。對象的 屬 性用來表示 它的特征 ， 對于屬性 的 設置，有 些 必須在屬 性 窗口中進 行 ，有些只 需 作適當 的 拖 動即可，比 如長、寬 、 位置。 9 their owncdsvlpa,mxukgf.()ybTqCzjSAX 2．數(shù)據(jù)輸入表單的建 立 過程 Visual Foxpro 數(shù)據(jù)輸入表單的建 立 過程，首 先 是打開表 單 設計器， 無 論是新建 表 單還 是修改已 有 的表單， 均 可以通過 菜 單操作或 專 用的命令 ， 或單擊常 用 工具欄中 的 有關按鈕來 打開表達 設 計器，接 著 是進行對 象 的操作與 編 碼，可利 用 表單設計 工 具來完成 ， 最后是保存 表單以及 運 行表單。 3． VFP 提 供 的表單設 計 工具 VFP 提供下列表單設計 工 具供程序 員 選擇使 用 （ 如 圖 21 所示 ）。 表 單設 計器窗口 及 其表 單窗口： 其 中表單設 計 器窗口中 的 Form1 即表單對象，稱 為 表單窗口 。 多數(shù)設計 工 作將在表 單窗口進 行 ， 包括往 窗 口內(nèi)添加 對 象 （控 件 ）， 并對各種 對 象進行操 作 與編碼 。 屬 性窗口 ： 用 于設置修 改 表單及其 包 含的對象 屬 性。代碼 編 輯窗口： 可 為對象添 加 各種事件 代 碼和方法程 序代碼 。 表 單工具欄 ： 包括如下 四 種表單設 計 工具欄 ， (1)表單控件 工 具欄 ： 用 于 在表單上添 加文本框 或 按鈕等各 類 控件 ， (2)表單設計器 工 具欄 ： 該工 具 欄包括的 按 鈕用于打 開 或關閉數(shù) 據(jù)環(huán)境對 話 框、設 置 tab 鍵次序、 屬 性窗口、 代 碼窗口、 表 單控件工 具 欄、調(diào)色 板 工具欄、 布局工具 欄 、表單生 成 器和自動 格 式工具欄 等 ，（ 3）布局工具欄：用 于 對齊、放 置 控件以及 調(diào)整控件 大 小等 ，（ 4） 調(diào)色板工 具 欄：用于 指 定某個控 件 的前景色 或 背景色等 。 數(shù)據(jù)環(huán)境設 計器窗口 ： 用于設計 表 單的數(shù)據(jù) 環(huán) 境。工具 欄 的顯示可 在 系統(tǒng)“顯 示 ”菜單中 設 置，也可以 直接單擊 “ 表單設計 器 工具欄” 中 相應的按 鈕 。 表單控件 工 具欄 表單設計 器 工具欄 表 單 設計 器和表單 布局工具欄 調(diào)色板工 具 欄 設置對象 屬 性 的屬性窗口 代碼編輯 窗 口 圖 21 VFP 提供的各 種 表單設計 工 具 10 their owncdsvlpa,mxukgf.()ybTqCzjSAX 利用表 單 設計器設 計 “學生 基 本 數(shù)據(jù)輸入 ” 表單 單擊項 目 管理器上 方 的“文檔 ” 選項卡。 單擊“ 表 單 ”，再單 擊 右邊的“ 新 建 ”，進入 表 單設計界 面 。 按“ Ctrl+S”鍵保存表單，取名 為 “學生輸入 ”。 單擊窗 口 右上角最 大 化按鈕， 使 “表單設 計 －學生輸入 .SCX”窗口最大化。 移動鼠 標 ，適當放 大 表單窗口。 激活 “ 屬 性－ 學 生 輸 入 .SCX”窗口，找 到屬 性“ CAPTION”，將原 來的 名字“ Form1” 改名為“ 學 生基本數(shù) 據(jù) 輸入 ”。此 時 ，應得到 圖 22。 圖 22 將表單“學 生 輸入” 的 CAPTION 改為 “學生基本 數(shù) 據(jù)輸入” 單擊“表單控件”中的標簽按 鈕 ，使 其 凹下去，此時鼠標變成十字形狀，按住 鼠標左鍵 在 表單上方 拖 放，松開 鼠 標后，出 現(xiàn) “ Label1”標簽。 在“屬 性 ”窗口中 找 到對象“ Label1”的“ Caption”屬 性 ，改名為 “ 學生基本 數(shù)據(jù) 輸入 ”。 設置字 體 、 字號 ： 在 “屬性 ” 窗 口中找到 對 象 “ Label1”的 “ FontName” 屬性 ， 將其 設置為“ 楷 體 ”，同時 將 “ FontSize”屬性設 置 為 24（號字 ）。 適當設 置 其背景色“ BackColor”屬性的值 和 前景色 “ ForeColor” 屬性的值。 方 法 為 ： 找 到 “ BackColor” 屬性 ， 單 擊 屬性設置 窗 口右邊 的 按鈕 ， 在 打 開 的 “顏 色 ” 窗 口 任 意自選一 種 顏色即可 ?！?ForeColor” 屬性的設置方法相同。 在表單中用鼠標適 當 拖 動 “學生基本數(shù)據(jù) 輸 入 ”， 使其 居 于上部中 間 。 如 圖 23 所 示 。 11 their owncdsvlpa,mxukgf.()ybTqCzjSAX 圖 23 在表單中設計 一 個標簽“ 學 生基本數(shù) 據(jù) 輸入” 每一個表 單 或表單集 都 包括一個 數(shù) 據(jù)環(huán)境， 數(shù) 據(jù)環(huán)境是 一 個對象， 它 包含可以 與 表單相互作用的 表 或視圖， 以 及表單所 要 求的表之 間 的關系。 我 們可以在 “ 數(shù) 據(jù)環(huán)境 設 計器”中直觀地設置 數(shù) 據(jù)環(huán)境， 并 與表單一 起 保存。 單擊屏 幕 上方的“ 數(shù) 據(jù)環(huán)境” 工 具按 鈕 。 在“添 加 表或視圖 ” 窗口單擊 學 生，再單 擊 “添加” 按 鈕，出現(xiàn) 如 圖 24 的屏幕。 圖 24 在數(shù)據(jù)環(huán)境 中 添加表“ 學 生” 然后關閉“添加表或視圖”窗口。此時 ，“ 數(shù) 據(jù)環(huán)境設計器－學生輸入 .SCX” 應 如 圖25。 12 their owncdsvlpa,mxukgf.()ybTqCzjSAX 圖 25 關閉“添加表 或 視圖”窗 口 后 按住“ 字 段 ”，將其 拖 放到表單 中 ，如 圖 26。 。 圖 26 將表“學 生” 的 字段拖放 到 表單中 選中剛剛拖來的標簽“性別 ”， 按 下“ Delete”鍵將其刪除；用同樣方法刪除右 邊 的 文本框。 按照上 面 的方法， 再 刪除標簽 “ 出生年月 ” 及其右邊 的 文本框。 再依次 選 中剩下 的 6 個控件， 將 它們的“ FontSize”屬 性 改 為 16。并利用鼠標 拖 放 控件周圍 的 8 個小黑方 塊 調(diào)整控件 大 小，并選 擇 適當?shù)淖?體 、顏色， 直 到如 圖 27。 13 their owncdsvlpa,mxukgf.()ybTqCzjSAX鈕 圖 27 對表單中的字 段 進行調(diào)整后 單擊表單控件中的 命 令 按 ， 然后再在表單下部 畫 一按鈕 ， 在屬 性窗口 中 ， 將命 令按鈕 的 Caption 屬性由原來 的“ mand1”改 為“ 增加 ”（ 即 增 加一條記錄 ）；同時 將 FontSize 屬性改 為 16（號字 ）。 用 同樣的方 法 設置其 他 6 個命令按 鈕 ，適當調(diào) 整 各命令按 鈕 的位置， 使其如 圖 28。 圖 28 在表單中設 置 6 個命令按鈕 雙擊“ 增 加”按鈕 ， 進入對象 與 過程的代 碼 編輯窗口 ， 保證對象 是 Command1， 過程 是 Click，在屏幕上鍵 入 如 圖 29 所示命令， 然 后關閉窗 口 ，回到表 單 編輯狀態(tài)。 圖 29 為 Command1 的 Click 過程輸入程序代碼 their owncdsvlpa,mxukgf.()ybTqCzjSAX14 their owncdsvlpa,mxukgf.()ybTqCzjSAX 用同樣 的 方法設計 另 外 6 個命 令 按 鈕 “刪除 ”、“前一 條 ”、“后一條 ”，“ 首條 ”、“ 末 條 ”、 “返回 ”， 各 命令按鈕 的 click 過程命令如下： 刪除 ： delete pack go bottom 前一條 ： if re( )1 skip 1 endif 后一條 ： if !eof( ) skip endif 首條 ： go top 末條： go bottom 返回： dele for 學 號 = spac(12) pack use 因 為 對記 錄 進 行 了修 改 ， 需 獨占 使 用 “ 學 生 .dbf ”：雙 擊 表 單 空 白處 ， 保 證 對象是 Form1，過程 是 Load，輸入命令： use 學 生 exclusive。 關閉窗 口 ，記錄輸 入 表單設計 完 成。 （三）運 行 表單輸入 數(shù) 據(jù) 數(shù) 據(jù) 單擊運 行 工具按 鈕 即可輸入記錄 ， 每 輸 入一個記 錄 都要單擊 一 次 “增加 ” 按 鈕。 記錄輸入 完 成后，按 “ 返回”按 鈕 退出（不 可 用關閉窗 口 按 鈕 ）。然后再 關 閉表單設計 器，回到 項 目管理器 狀 態(tài)。 15 their owncdsvlpa,mxukgf.()ybTqCzjSAX： 學 號 姓 名 班級編號 202101202101 王曉偉 B02021012 202101202102 夏巖 B02021012 202101202103 陳凱 B02021012 202101202104 曹俊 B02021012 202101202105 沈鵬 B02021012 202101202106 周輝 B02021012 202101202109 張波 B02021012 202101202110 孫思坤 B02021012 202101202111 代志漢 B02021012 202101202112 肖超 B02021012 202101202113 彭錦錦 B02021012 202101202114 諶華僑 B02021012 202101202115 夏歡 B02021012 202101202116 朱其松 B02021012 202101101301 謝謙 B02021013 202101101302 江瑋 B02021013 202101101303 吳江 B02021013 202101101304 肖凱 B02021013 202101101317 喻偌晶 B02021013 202101101318 門彥 B02021013 202101101319 張穎 B02021013 202101101320 尹琪 B02021013 202101101321 羅珺 B02021013 202101101322 肖晗 B02021013 202101101324 唐瑋璇 B02021013 202101101325 黎志英 B02021013 202101101333 梁穎 B02021013 202101101334 張靜 B02021013 202101101335 陳敬丹 B02021013 202101301201 仲長春 B02021012 202101301202 陳德意 B02021012 202101301203 嚴啟華 B02021012 202101301204 連思拓 B02021012 202101301205 雷誠 B02021012 202101301206 楊耀國 B02021012 202101301207 李雄 B02021012 202101301208 張煉 B02021012 202101301209 鄭雷 B02021012 202101301210 劉盼 B02021012 their owncdsvlpa,mxukgf.()ybTqCzjSAX202101301211 鐘華 B02021012 202101301212 李林杰 B02021012 202101301213 張濤 B02021012 202101301214 雷克成 B02021012 202101301215 張峰 B0202