VB程序設計 第二章 Visual Basic 程序設計概述

《VB程序設計 第二章 Visual Basic 程序設計概述》由會員分享，可在線閱讀，更多相關(guān)《VB程序設計 第二章 Visual Basic 程序設計概述（45頁珍藏版）》請在裝配圖網(wǎng)上搜索。

1、Visual Basic程序設計教程 內(nèi)蒙古科技大學實踐訓練中心第 二 章 Visual Basic 程 序 設 計 概 述 計 算 機 軟 件 開 發(fā) 歷 史 結(jié) 構(gòu) 化 程 序 設 計 (C， Pascal)高 級 語 言 (Fortran,Basic)匯 編 語 言 二 進 制 代 碼 （ 機 器 語 言 ）面 向 對 象 程 序 設 計結(jié) 構(gòu) 化 程 序 設 計早 期 程 序 設 計 面 向 對 象 程 序 設 計 (C+)可 視 化 程 序 設 計 (VB,VC等 ) 20世 紀 50年 代 用 機 器 語 言 編 寫 代 碼 。 程 序 員 重 復 處 理 0與 1不 得 不花 費

2、 大 量 的 時 間 來 編 制 與 調(diào) 試 程 序 。 采 用 符 號 指 令 的 匯 編 語 言 代 替 了 機 器 語 言 。 高 級 語 言 簡 化 了 程 序 設 計 。 用 高 級 語 言 編 寫 的 程 序 與 機 器 無 關(guān) ；程 序 員 擺 脫 了 機 器 本 身 的 特 性 限 制 ， 精 力 只 集 中 于 算 法 。 20世 紀 70年 代 初 期 ， 大 型 系 統(tǒng) 軟 件 （ 如 操 作 系 統(tǒng) 、 數(shù) 據(jù) 庫 等 ） 給程 序 設 計 帶 來 了 新 的 問 題 。 促 使 人 們 對 程 序 設 計 方 法 進 行 研 究 ，從 而 提 出 了 應 該 如 何

3、設 計 程 序 ， 設 計 程 序 的 基 本 指 導 思 想 是 什 么 ，采 用 什 么 樣 的 程 序 設 計 方 法 為 好 等 問 題 。 1969年 荷 蘭 科 學 家 Dijkstra提 出 了 結(jié) 構(gòu) 化 程 序 設 計 的 思 想 與 概 念 。 結(jié) 構(gòu) 化 程 序 設 計 基 本 思 想 ： 程 序 的 結(jié) 構(gòu) 規(guī) 定 為 ： 順 序 、 選 擇 和 三 種 基 本 結(jié) 構(gòu) ； 限 制 使 用GOTO語 句 ， 采 用 程 序 設 計 原 則 ， 將 大 型系 統(tǒng) 分 解 為 功 能 獨 立 的 模 塊 ， 使 其 最 終 轉(zhuǎn) 化 為 上 述 三 種 基 本 結(jié) 構(gòu) 。 結(jié)

4、 構(gòu) 化 程 序 未 能 解 決 的 問 題 ： 1、 模 塊 分 割 主 要 針 對 控 制 流 ， 仍 含 有 與 人 的 思 維 方 式 不 協(xié) 調(diào) 的 地方 ， 很 難 自 然 、 準 確 地 反 映 真 實 世 界 ， 軟 件 質(zhì) 量 很 難 保 證 。 2、 只 突 出 了 實 現(xiàn) 功 能 的 操 作 方 法 （ 模 塊 ） ， 而 被 操 作 的 數(shù) 據(jù) （ 變量 ） 處 于 功 能 的 從 屬 地 位 ， 即 程 序 模 塊 與 數(shù) 據(jù) 結(jié) 構(gòu) 是 松 散 地 耦 合 在 一起 ， 當 程 序 復 雜 時 ， 容 易 出 錯 ， 難 以 維 護 。 面 向 對 象 程 序 設

5、計 （ OOP） 旨 在 使 計 算 機 問 題 的 求 解 更 接 近 于 人 的 思 維活 動 ， 使 軟 件 的 開 發(fā) 形 成 一 個 由 抽 象 到 具 體 、 由 簡 單 到 復 雜 這 樣 一 個循 序 漸 進 的 過 程 。 克 服 大 型 軟 件 開 發(fā) 中 存 在 的 效 率 低 、 質(zhì) 量 難 以 保 證 、調(diào) 試 復 雜 、 維 護 困 難 等 問 題 。 面 向 對 象 將 大 量 的 工 作 由 相 應 的 對 象 來 完 成 ， 程 序 員 在 應 用 程 序 中 只需 說 明 要 求 對 象 完 成 的 任 務 。 面 向 對 象 程 序 設 計 （ OOP）

6、的 優(yōu) 點 ： 1、 使 軟 件 開 發(fā) 過 程 符 合 人 們 的 思 維 方 法 ， 便 于 分 析 解 決 復 雜 的 問 題 2、 使 軟 件 的 維 護 和 功 能 增 減 易 于 實 現(xiàn) 。 3、 使 程 序 代 碼 可 重 用 ， 從 而 提 高 了 軟 件 開 發(fā) 的 效 率 ； 4、 與 可 視 化 技 術(shù) 相 結(jié) 合 ， 使 用 戶 界 面 圖 形 化 、 更 美 觀 、 更 友 好 。 “ 對 象 ” 是 系 統(tǒng) 中 的 基 本 運 行 實 體 。 現(xiàn) 實 生 活 中 ， 一 個 人 、 一 輛 車 等 均 可 視 為 一 個 對 象 。 為 了 區(qū) 別 和 標 識 不

7、同 的 對 象 ， 每 個 對 象 有 一 個 屬 于 自 己 的 名 字 ， 稱 為 對 象 名 。 在 VB應 用 程 序 中 ， 構(gòu) 成 圖 形 用 戶 界 面 的 每 一 個 可 視 的 部 件 均 可 視 為 對 象 。的 對 象 分 為 窗 體 和 控 件 兩 大 類 。 窗 口 本 身 ， 是 屏 幕 上 的 一 個 矩 形 區(qū) 域 ； 窗 口 上 構(gòu) 成 圖 形 用 戶 界 面 的 一 些 基 本 組 成 部 件 ； (1)內(nèi) 部 控 件 ： 是 由 VB系 統(tǒng) 提 供 的 。 啟 動 VB后 ， 內(nèi) 部 控 件 出 現(xiàn) 在 工 具 箱 上 。 (2)ActiveX控 件 ：

8、是 擴 展 名 為 .OCX的 獨 立 文 件 。 (3)可 插 入 對 象 ： VB系 統(tǒng) 中 有 一 些 能 直 接 使 用 的 對 象 ， 其 可 被 添 加 到 工 具 箱上 。 對 象 的 建 立 方 法 ： （ 1） 添 加 和 刪 除 控 件 到 窗 體 上 （ 2） 編 輯 控 件 選 擇 控 件 移 動 控 件 移 動 改 變 控 件 大 小 復 制 控 件 控 件 的 布 局 控 件 的 名 稱 1、 對 象 的 屬 性 在 VB系 統(tǒng) 中 ， 選 中 一 個 對 象 后 ， 可 以 在 屬 性 窗 口 中 修 改 屬 性 值 ，也 可 在 程 序 運 行 階 段 用 語

9、句 來 設 置 或 修 改 其 屬 性 值 。 在 程 序 中 設 置 屬 性 的 語 法 格 式 為 ： 對 象 名 .屬 性 名 屬 性 值 例 【 2-1】 設 計 階 段 修 改 對 象 屬 性 在 窗 體 上 放 置 一 個 名 為 command1的 命 令 按 鈕 ， 將 其 屬 性 列 表 框 中的 caption屬 性 值 改 為 “ 按 鈕 ” ， height屬 性 值 改 為 890。 解 題 思 路 ： 選 擇 命 令 按 鈕 ， 在 其 屬 性 列 表 框 中 修 改 “ caption” 和“ height” 屬 性 。 例 【 2-2】 運 行 階 段 修 改

10、對 象 屬 性 在 窗 體 上 放 置 一 個 名 為 command1的 命 令 按 鈕 ， 程 序 運 行 后 ， 點 擊 窗體 ， 將 命 令 按 鈕 的 caption屬 性 值 改 為 “ 按 鈕 ” ， height屬 性 值 改 為890。 解 題 思 路 ： 首 先 在 窗 體 上 放 置 一 個 名 為 command1的 命 令 按 鈕 ， 在 窗 體的 click事 件 中 填 寫 相 應 的 命 令 ， 改 寫 按 鈕 的 屬 性 值 。Private Sub Form_click( ) command1.caption=“按 鈕 ” command1.height=8

11、90End Sub 2、 對 象 的 事 件 、 事 件 過 程 和 事 件 驅(qū) 動 （ 1） 事 件 在 VB中 ， 事 件 是 發(fā) 生 在 對 象 身 上 ， 且 能 被 對 象 識 別 的 動 作 。 如 ： 用 鼠 標 單 擊 對 象 ， 則 會 在 對 象 身 上 產(chǎn) 生 單 擊 事 件 （ Click)，雙 擊 對 象 ， 則 會 在 對 象 身 上 產(chǎn) 生 雙 擊 事 件 （ DblClick)。 VB系 統(tǒng) 為 每 個 對 象 預 先 定 義 了 一 系 列 事 件 ， 例 如 ： 單 擊 （ Click） ， 雙 擊 （ DblClick） ， 改 變 （ Change） ，

12、 鼠 標 移 動 （ MouseMove） 等 。 2、 對 象 的 事 件 、 事 件 過 程 和 事 件 驅(qū) 動 （ 2） 事 件 過 程 當 事 件 在 對 象 身 上 發(fā) 生 后 ， 應 用 程 序 就 要 處 理 這 個 事 件 ， 處 理 事件 的 步 驟 就 是 事 件 過 程 。 VB應 用 程 序 設 計 的 主 要 工 作 就 是 為 對 象 編 寫 事 件 過 程 的 代 碼 ， 一般 格 式 為 ： Private Sub 對 象 名 _事 件 (參 數(shù) 列 表 ) 事 件 過 程 代 碼 End Sub 2、 對 象 的 事 件 、 事 件 過 程 和 事 件 驅(qū) 動

13、 （ 2） 事 件 過 程 例 【 2-3】 有 一 命 名 為 Command1的 命 令 按 鈕 對 象 ， 要 求 當 用 戶 單 擊 命令 按 鈕 時 ， 結(jié) 束 程 序 的 運 行 解 題 思 路 ： VB系 統(tǒng) 中 ， 結(jié) 束 程 序 運 行 的 命 令 為 “ END” 。 在 按 鈕 的click事 件 中 填 寫 該 命 令 即 可 。Private Sub Command1_click( ) end 結(jié) 束 程 序 的 運 行End Sub 2、 對 象 的 事 件 、 事 件 過 程 和 事 件 驅(qū) 動 （ 3） 事 件 驅(qū) 動 程 序 設 計 在 傳 統(tǒng) 的 面 向 過

14、 程 的 程 序 設 計 中 ， 應 用 程 序 的 執(zhí) 行 總 是 從 第 一行 代 碼 開 始 ； 在 面 向 對 象 的 程 序 設 計 中 ， 應 用 程 序 先 等 待 某 個 事 件 的 發(fā) 生 ，然 后 再 去 執(zhí) 行 處 理 此 事 件 的 事 件 過 程 。 發(fā) 生 事 件 的 順 序 決 定 了 代 碼執(zhí) 行 的 順 序 ， 若 沒 有 事 件 發(fā) 生 ， 整 個 程 序 將 處 于 停 滯 等 待 狀 態(tài) 。 2、 對 象 的 事 件 、 事 件 過 程 和 事 件 驅(qū) 動 （ 3） 事 件 驅(qū) 動 程 序 設 計 VB應 用 程 序 的 執(zhí) 行 步 驟 ： 窗 體 或

15、窗 體 上 的 對 象 等 待 事 件 的 發(fā) 生事 件 發(fā) 生 時 ， 執(zhí) 行 相 應 的 事 件 過 程啟 動 應 用 程 序 ， 裝 載 和 顯 示 窗 體 如 此 周 而 復 始 地 執(zhí) 行 ， 直 到 遇 到 “ END”語 句 結(jié) 束 程 序 的 運 行 或 單 擊“ 結(jié) 束 ” 按 鈕 強 行 結(jié) 束 程 序 的 允 許 。 3、 對 象 的 方 法 VB系 統(tǒng) 中 的 方 法 指 對 象 本 身 所 包 含 的 一 些 特 殊 函 數(shù) 或 過 程 。 當用 方 法 來 控 制 一 個 對 象 的 行 為 時 ， 其 實 質(zhì) 就 是 調(diào) 用 該 對 象 內(nèi) 部 的 某個 特 殊

16、的 函 數(shù) 的 過 程 。 例 如 ： 窗 體 對 象 擁 有 Hide方 法 和 Show方 法 ， 調(diào) 用 Hide方 法 可 窗體 隱 藏 起 來 ， 調(diào) 用 Show方 法 可 使 窗 體 顯 現(xiàn) 出 來 。 在 VB系 統(tǒng) 中 對 象 方 法 的 調(diào) 用 格 式 ： 對 象 名 方 法 名 參 數(shù) 列 表 如 ： form1.hide 隱 藏 窗 體 form1 form1.show 顯 示 窗 體 form1 3、 對 象 的 方 法 例 【 2-4】 現(xiàn) 有 一 個 名 為 Command1的 命 令 按 鈕 ， 當 用 戶 單 擊 該 按 鈕時 ， 使 其 移 動 為 坐 標

17、（ 120， 300） 的 位 置 。 解 題 思 路 ： 調(diào) 用 方 法 “ move” ， 將 按 鈕 移 動 到 指 定 的 位 置 。Private Sub command1_click( ) command1.move 120,300End sub 3、 對 象 的 方 法 例 【 2-5】 當 用 戶 單 擊 窗 體 時 ， 調(diào) 用 窗 體 對 象 的 方 法 Print， 在 窗 體 上打 印 出 “ 歡 迎 你 學 習 Visual Basic 6.0” 字 符 串 . 解 題 思 路 ： 調(diào) 用 窗 體 的 方 法 “ print” ， 將 字 符 串 顯 示 在 窗 體 上

18、Private Sub Form_Click( ) form1.print “歡 迎 你 學 習 Visual Basic 6.0”End Sub Name ： 窗 體 名 稱 ； 默 認 為 Form1， 只 能 在 屬 性 窗 口 設 置 Caption： 窗 體 標 題 欄 顯 示 的 文 本 ， 可 在 屬 性 窗 口 和 程 序 中 設 置 Height， Width： 指 定 窗 體 的 高 度 和 寬 度 。 可 在 屬 性 窗 口 和 程 序 中 設 置 Left， top： 指 定 窗 體 的 高 度 和 寬 度 。 可 在 屬 性 窗 口 和 程 序 中 設 置 Font：

19、 用 于 改 變 窗 體 或 對 象 上 文 本 的 外 觀 。 FontName： 字 體 類 型 ， 用 于 設 置 窗 體 或 對 象 上 文 本 的 字 體 。 FontSize： 整 型 ， 用 于 設 置 窗 體 或 對 象 上 文 本 的 字 體 大 小 。 FontBold： 邏 輯 型 ， 該 值 為 True時 用 于 設 置 窗 體 或 對 象 上 文 本 為 粗 體 。 FontItalic： 邏 輯 型 ， 該 值 為 True時 用 于 設 置 窗 體 或 對 象 上 文 本 為 斜 體 。 FontStrikethru： 邏 輯 型 ， 該 值 為 True時 給

20、 窗 體 或 對 象 上 文 本 加 一 刪 除 線 FontUnderLine： 邏 輯 型 ， 該 值 為 True時 用 于 給 窗 體 或 對 象 上 文 本 加 一 下 劃 線 (6)Enabled： 用 于 決 定 是 否 允 許 操 作 窗 體 。 True為 允 許 ， False為 禁 止 。 (7)Visible： 用 于 決 定 程 序 運 行 時 窗 體 是 否 可 見 。 True為 可 見 ， False為 不 可 見 。 (8)MaxButton， MinButton： 用 于 設 置 窗 體 右 上 角 的 最 大 化 、 最 小 化 按 鈕 。 只 能 在 屬

21、 性 窗 口 中 設 置 。 (9)Icon圖 標 和 ControlBox控 制 菜 單 ： 在 屬 性 窗 口 中 單 擊 Icon設 置 框 右 邊 的 “ ” ， 可 以 裝 入 一 個 擴 展 名 為 .ico或 . Cur圖 標 文 件 ， 當窗 體 最 小 化 時 加 以 該 圖 標 顯 示 。 Icon屬 性 在 程 序 中 設 置 的 方 法 ： Form1.Icon=Loadpicture(盤 符 路 徑 及 圖 標 文 件 名 ) 如 ： form1.icon=loadpicture(“c:abcpict1.ico”) ControlBox屬 性 為 True時 ， 窗

22、體 有 上 角 有 控 制 菜 單 框 ， 為 False時 則無 。 控 制 菜 單 以 圖 標 形 勢 顯 示 。 (10)BackColor： 用 于 設 置 窗 體 或 對 象 的 背 景 顏 色 。 (11)ForeColor： 用 于 設 置 窗 體 或 對 象 的 前 景 顏 色 。 對 于 窗 體 ， 前 景 色 是 窗 體 上 用 Print方 法 輸 出 的 文 本 的 顏 色 ， 程 序 運 行 后 才 能 看 到 。 (12)BorderStyle： 用 于 設 置 窗 體 邊 框 的 樣 式 。 0 None， 無 邊 框 ， 無 法 移 動 及 改 變 大 小 1

23、Fixed Single， 單 線 邊 框 ， 可 移 動 但 不 可 改 變 大 小 2 Sizeable， 雙 線 邊 框 ， 可 移 動 、 改 變 大 小 3 Fixed Dialog， 為 固 定 對 話 框 ， 不 可 改 變 大 小 4 Fixed ToolWindow， 窗 體 外 觀 與 工 具 條 相 似 ， 有 關(guān) 閉 按 鈕 ， 不 能 改 變 大 小 5 Sizeable ToolWindow， 窗 體 外 觀 與 工 具 條 相 似 ， 有 關(guān) 閉 按 鈕 ， 能 改 變 大 小 (13)Picture： 用 于 設 置 窗 體 中 要 顯 示 的 圖 片 。 方

24、法 ： 單 擊 Picture設 置 框 右 邊 的 “ ” ， 便 可 加 載 一 個 圖 形 文 件 。 在 程 序 中 設 置 該 屬 性 的 方 法 ： Form1.Picture=LoadPicture(圖 形 文 件 源 路 徑 及 文 件 名 ) 如 ： form1.picture=loadpicture(“d:abcpict1.jpg”)(14)Windows State： 用 于 設 置 窗 口 的 狀 態(tài) 。 0 Normal， 正 常 狀 態(tài) ， 有 窗 口 邊 界 1 Minimized， 最 小 化 狀 態(tài) ， 以 圖 標 方 式 運 行 2 Maxmized， 最

25、大 化 狀 態(tài) ， 無 邊 框 ， 充 滿 整 個 屏 幕 事 件 分 類 ： 根 據(jù) 來 源 分 為 ： 鼠 標 事 件 、 鍵 盤 事 件 和 系 統(tǒng) 事 件 。 窗 體 最 常 用 的 事 件 ： Click(單 擊 )， DblClick(雙 擊 )和 Load(裝 入 )。 另 外 ： 在 窗 體 裝 載 和 關(guān) 閉 時 ， 系 統(tǒng) 會 自 動 產(chǎn) 生 一 些 事 件 。 Initialize事 件 ， Resize事 件 ， Paint事 件 ， Active事 件 ， Deactive事 件 ， QueryUnload事 件 ， Unload事 件 ， Terminate事 件

26、。 用 戶 使 用 鼠 標 或 鍵 盤 操 作 會 觸 發(fā) 窗 體 的 一 些 事 件 ： MouseDown（ 鼠標 按 下 ） ， MouseUp（ 鍵 釋 放 ） ， MouseMove（ 鼠 標 移 動 ） ， keyDown（ 鍵 按 下 ） ， KeyUp（ 鍵 釋 放 ） ， KeyPress（ 鍵 按 下 并 釋 放 ） 1、 Click事 件 當 用 戶 將 鼠 標 置 于 窗 體 上 ， 按 下 鼠 標 左 鍵 并 立 即 釋 放 （ 即 單 擊 操 作 ） ，此 時 會 在 窗 體 上 觸 發(fā) Click事 件 。 格 式 ： Private Sub Form_Click

27、 (Index As Integer) End Sub 參 數(shù) 說 明 ： 只 有 當 對 象 為 控 件 數(shù) 組 時 ， 參 數(shù) Index才 會 出 現(xiàn) 。 Index參 數(shù) 值 由 VB自 動 傳 入 ， 在 事 件 過 程 中 可 以 引 用 ， 其 值 代 表 用 戶 單 擊 控 件 數(shù) 組 中 的 那 一 個 成 員 。 2、 DblClick事 件 當 用 戶 在 窗 體 上 用 鼠 標 快 速 雙 擊 左 鍵 時 產(chǎn) 生 DblClick（ 雙 擊 ） 事 件 。 格 式 ： Private Sub Form_DblClick (Index As Integer) End Su

28、b 3、 Load事 件 當 窗 體 從 磁 盤 裝 入 內(nèi) 存 時 引 發(fā) 的 事 件 。 它 由 系 統(tǒng) 操 作 觸 發(fā) 或 通 過 Load語 句 觸 發(fā) 。 經(jīng) 常 用 來 在 啟 動 應 用 程 序 時 對 屬 性 和 變 量 進 行 初 始 化 。 格 式 ： Private Sub Form_Load( ) End Sub 1、 Print方 法 ： 在 窗 體 或 控 件 上 輸 出 變 量 的 值 或 其 他 信 息 。 如 ： form1.print “歡 迎 使 用 Visual Basic” 2、 Cls方 法 ： 清 除 窗 體 或 控 件 上 的 信 息 。 如 ：

29、 form1.cls 3、 Move方 法 ： 移 動 窗 體 或 控 件 ， 并 可 改 變 其 大 小 。 如 ： command1.move 120,300 例 【 2-6】 窗 體 無 最 大 化 按 鈕 和 最 小 化 按 鈕 ， 窗 體 裝 入 時 ， 在 窗 體 的 標 題欄 顯 示 “ 裝 入 窗 體 ” ， 并 在 窗 體 上 裝 入 一 幅 圖 片 作 為 背 景 ； 當 用 戶 單 擊窗 體 時 ， 在 標 題 欄 顯 示 “ 單 擊 ” ， 在 窗 體 上 顯 示 “ 單 擊 窗 體 ” ； 當 用 戶雙 擊 窗 體 時 ， 在 標 題 欄 顯 示 “ 鼠 標 雙 擊

30、” ， 去 除 窗 體 的 背 景 圖 案 ， 并 顯示 “ 雙 擊 窗 體 ”解 題 思 路 ： 首 先 在 窗 體 的 屬 性 列 表 框 中 設 置 相 應 屬 性 值 ； 在 窗 體 的 Load事 件 、 click事 件 和 dblclick事 件 中 填 寫 相 應 的 命 令 。 另 ： 窗 體 載 入 圖 片 的 命 令 ： form1.picture=loadpicture(圖 片 所 在 的 路 徑 以 及 圖 片 的 名 稱 ) 清 除 窗 體 載 入 圖 片 的 命 令 ： form1.picture=loadpicture(“”) form1.picture=loa

31、dpicture( ) 2.4.1 標 簽 （ Label） 1、 屬 性 標 簽 （ Label） 主 要 用 于 顯 示 一 小 段 文 本 ， 通 常 用 來 標 注 本 身 不具 有 Caption屬 性 的 控 件 ， 如 用 標 簽 給 文 本 框 附 加 描 述 等 。屬 性 名 屬 性 值 說 明Caption 字 符 型 數(shù) 據(jù) 顯 示 在 標 簽 上 的 正 文 （ 標 題 ）Alignment 0,1,2 0 靠 左 ， 1 靠 右 ， 2 居 中AutoSize True,False 根 據(jù) 顯 示 的 標 題 自 動 調(diào) 整 大 小BorderStyle 0,1 0

32、無 邊 框 ,1 有 邊 框 (單 邊 框 )BackStyle 0,1 0 透 明 ， 其 后 的 背 景 色 和 內(nèi) 容 為 可 見 ，1 非 透 明 ， 可 隱 藏 其 后 的 背 景 色 和 內(nèi) 容 2、 事 件 標 簽 可 以 觸 發(fā) Click和 DblClick等 事 件 ， 但 很 少 用 來 觸 發(fā) 。 2.4.1 標 簽 （ Label） 例 【 2 7】 在 窗 體 創(chuàng) 建 兩 個 標 簽 ， 但 單 擊 一 次 窗 體 后 ， 將 兩 個 標 簽上 的 內(nèi) 容 交 換 。 解 題 思 路 ： 觸 發(fā) 的 事 件 為 ： 窗 體 的 click事 件 。Temp AB T

33、emp=A （ 1） A=B (2) B=Temp (3) 2.4.2 文 本 框 1、 屬 性 文 本 框 （ TextBox） 提 供 一 個 既 能 顯 示 又 能 編 輯 文 本 的 區(qū) 域 。 在 程 序運 行 中 ， 可 在 文 本 框 中 輸 入 正 文 ， 也 可 對 其 中 的 文 字 進 行 選 擇 、 刪 除 、復 制 和 粘 貼 等 操 作 。屬 性 名 屬 性 值 說 明Text 字 符 型 數(shù) 據(jù) 文 本 框 中 顯 示 的 文 字 內(nèi) 容 。MaxLength 數(shù) 值 型 數(shù) 據(jù) 允 許 輸 入 的 最 大 字 符 數(shù) 。 0 無 限 制MultiLine Tru

34、e,False 是 否 允 許 輸 入 多 行 文 字PassWordChar 字 符 型 數(shù) 據(jù) 設 置 密 碼 輸 入 。 空 ， 則 原 樣 顯 示ScrollBars 0， 1， 2， 3 0 無 滾 動 條 ， 1 水 平 滾 動 條 ， 2 垂 直 滾 動條 ， 3 水 平 、 垂 直 滾 動 條 SelLength 數(shù) 值 型 數(shù) 據(jù) 框 中 當 前 選 中 的 字 符 個 數(shù) 。 只 能 在 程 序 運 行中 設 置 和 返 回 2.4.2 文 本 框 TextBox屬 性 名 屬 性 值 說 明SelStart 數(shù) 值 型 數(shù) 據(jù) 當 前 選 中 的 字 符 中 第 一 個

35、字 符 的 位 置 。 只 能在 程 序 運 行 中 設 置 和 返 回SelText 字 符 型 數(shù) 據(jù) 當 前 心 中 的 文 字 內(nèi) 容 。 只 能 在 程 序 運 行 中 設置 和 返 回Locked True， False 是 否 鎖 定 文 本 框 。2、 事 件 ： 除 Click、 DblClick事 件 外 ， 還 有 以 下 事 件 （ 1） Change： 當 文 本 框 的 Text屬 性 值 發(fā) 生 變 化 時 ， 將 觸 發(fā) 此 事 件 。 （ 2） GotFocus： 當 文 本 框 獲 得 焦 點 時 ， 觸 發(fā) 該 事 件 。 (3） LostFocus： 當

36、 文 本 框 失 去 焦 點 時 ， 觸 發(fā) 該 事 件 。 （ 4） KeyPress： 當 文 本 框 獲 得 焦 點 后 ， 并 在 鍵 盤 按 下 某 一 個 鍵 時 觸 發(fā) 該 事 件 1、 屬 性 （ 續(xù) ) 2.4.2 文 本 框3、 方 法 常 用 方 法 為 SetFocus方 法 。 調(diào) 用 此 方 法 可 以 使 文 本 框 獲 得 焦 點 。例 【 2-8】 在 窗 體 上 建 立 三 個 文 本 框 ， 單 擊 窗 體 后 ， 利 用 文 本 框 的 change事 件 在 另 兩 個 文 本 框 中 顯 示 第 一 個 文 本 框 文 字 的 大 小 寫 。解 題

37、思 路 : 觸 發(fā) 的 事 件 為 第 一 個 文 本 框 的 change事 件 ； 將 字 符 串 轉(zhuǎn) 換 為 小寫 的 函 數(shù) 為 Lcase()； 將 字 符 串 轉(zhuǎn) 換 為 大 寫 的 函 數(shù) 為 Ucase()。 Private Sub Text1_Change() text2.text=lcase(text1.text) text3.text=ucase(text1.text)End Sub 2.4.3 命 令 按 鈕 Command Button 1、 屬 性 屬 性 名 屬 性 值 說 明Caption 字 符 型 數(shù) 據(jù) 在 按 鈕 上 顯 示 的 標 題 信 息 ， 可

38、在 其 某 個 字 母 前加 “ &”， 則 該 字 母 將 帶 下 劃 線 成 為 快 捷 鍵 ， 當用 戶 按 下 Alt+快 捷 鍵 相 當 于 用 鼠 標 單 擊 該 鍵Cancel 邏 輯 型 數(shù) 據(jù) 該 屬 性 若 為 True， 按 鍵 盤 的 ESC鍵 與 單 擊 該 命令 相 同 。 在 一 個 窗 體 中 ， 只 允 許 一 個 命 令 按 鈕的 Cancel屬 性 設 為 TrueDefault 邏 輯 型 數(shù) 據(jù) 該 屬 性 為 True時 ， 若 窗 體 中 的 按 鈕 都 不 具 有 焦點 ， 則 按 回 車 鍵 與 單 擊 該 命 令 的 按 鈕 作 用 相 同

39、。在 一 個 窗 體 中 只 允 許 一 個 命 令 按 鈕 的 Default屬性 為 True ToolTipText 字 符 型 數(shù) 據(jù) 設 置 當 鼠 標 在 控 件 上 暫 停 時 顯 示 的 文 本 2.4.3 命 令 按 鈕 （ Command Button）2、 事 件 常 用 事 件 為 Click事 件 。例 【 2-9】 在 窗 體 上 設 置 兩 個 按 鈕 和 一 個 文 本 框 ， 在 文 本 框 中 顯 示 命令 按 鈕 點 擊 的 次 數(shù) 。解 題 思 路 ： 設 置 一 個 統(tǒng) 計 點 擊 次 數(shù) 的 變 量 。 將 該 變 量 的 值 顯 示 在 文本 框

40、中 ?？?件 Caption Default Cancel Text TabindexCommand1 命 令 按 鈕 True False 1Command2 退 出 False True 2 Text 空 0 2.4.4 焦 點 與 Tab順 序1、 焦 點 焦 點 是 指 控 件 對 象 接 受 鼠 標 或 鍵 盤 輸 入 的 能 力 。 只 有 具 有 焦 點 的 控件 對 象 才 能 接 受 用 戶 由 鼠 標 和 鍵 盤 的 輸 入 。 當 控 件 對 象 獲 得 焦 點 時 ， 觸 發(fā) GotFocus事 件 ， 失 去 焦 點 時 ， 觸 發(fā)LostFocus事 件 。 大 多

41、 數(shù) 控 件 都 支 持 以 上 兩 個 事 件 。 控 件 對 象 獲 得 焦 點 的 途 徑 ： （ 1） 直 接 操 作 ： 比 如 用 Tab鍵 或 用 快 捷 鍵 、 鼠 標 直 接 點 擊 ； （ 2） 在 程 序 中 調(diào) 用 SetFocus方 法 ； 2、 Tab順 序 在 程 序 運 行 中 ， 當 按 下 Tab鍵 時 ， 焦 點 將 在 該 程 序 的 控 件 上 順 序 移動 ， 這 就 是 Tab順 序 。 通 常 ， 在 設 計 程 序 過 程 中 ， Tab順 序 是 由 控 件 的 建 立 順 序 決 定 的 。 若 要 修 改 Tab順 序 ， 需 要 改 變

42、 TabIndex的 屬 性 值 即 可 。 2.4.5 控 件 的 默 認 屬 性 控 件 的 默 認 屬 性 是 指 在 程 序 運 行 中 ， 不 必 指 定 控 件 的 屬 性 名 就 可 以改 變 其 值 的 屬 性 。 如 ： 文 本 框 的 默 認 屬 性 為 Text， 則 以 下 的 賦 值 是 等 價 的 : Text1.text =“ Visual Basic” Text1=“ Visual Basic”控 件 名 稱 默 認 屬 性 控 件 名 稱 默 認 屬 性文 本 框 （ Text） Text 標 簽 (Label) Caption命 令 按 鈕 (Command

43、 Button) Default 圖 形 、 圖 像 框 Picture單 選 按 鈕 (OptionButton) Value 復 選 框 (CheckBox) Value 1、 在 窗 體 上 建 立 對 象2、 設 置 對 象 的 屬 性3、 編 寫 對 象 事 件 過 程4、 保 存 和 運 行 程 序 例 【 2-10】 編 寫 一 個 圖 片 瀏 覽 器 ， 以 實 現(xiàn) 對 兩 幅 圖 片 內(nèi) 容 進 行 瀏 覽 。解 題 思 路 ： 在 窗 體 上 放 置 一 個 圖 片 框 和 三 個 命 令 按 鈕 。Private Sub Command1_Click( ) picture

44、1.picture=loadpicture(“d:abctu1.jpg”)End Sub Private Sub Command2_Click( ) picture1.picture=loadpicture(“d:abctu1.jpg”)End Sub 2.6.1 工 程 的 構(gòu) 成一 個 VB工 程 共 包 含 7鐘 類 型 文 件 1、 工 程 文 件 (.vbp) 該 文 件 共 包 含 與 該 工 程 有 關(guān) 的 全 部 文 件 和 對 象 的 清 單 。 2、 窗 體 文 件 (.frm) 該 文 件 包 含 窗 體 及 控 件 對 象 的 屬 性 設 置 ； 窗 體 級 的 變 量

45、 和 外 部過 程 的 聲 明 ； 事 件 過 程 和 用 戶 自 定 義 過 程 。 每 一 個 窗 體 都 有 一 個 窗 體文 件 。 3、 窗 體 的 二 進 制 文 件 （ .frx) 當 窗 體 或 控 件 的 數(shù) 據(jù) 含 有 二 進 制 屬 性 （ 如 圖 片 或 圖 標 ） ， 將 窗體 文 件 保 存 時 ， 系 統(tǒng) 會 自 動 產(chǎn) 生 同 名 的 .frx文 件 。 4、 標 準 模 塊 文 件 （ .bas) 該 文 件 包 含 模 塊 級 的 變 量 和 外 部 過 程 聲 明 ； 用 戶 自 定 義 的 、 可供 本 工 程 內(nèi) 各 窗 體 調(diào) 用 的 過 程 。 該

46、 文 件 可 選 。 2.6.1 工 程 的 構(gòu) 成 5、 類 模 塊 文 件 (.cls) 該 文 件 可 選 。 用 于 創(chuàng) 建 含 有 屬 性 和 方 法 的 用 戶 自 己 的 對 象 。 6、 資 源 文 件 (.res) 該 文 件 可 選 ， 包 含 不 必 重 新 編 輯 代 碼 就 可 以 位 圖 、 字 符 串 和 其他 數(shù) 據(jù) 。 7、 ActiveX控 件 的 文 件 （ .ocx) 該 文 件 可 以 添 加 到 工 具 箱 并 在 窗 體 中 應 用 。 2.6.2 創(chuàng) 建 、 打 開 和 保 存 工 程 1、 新 建 工 程 2、 打 開 工 程 3、 保 存 工

47、 程 4、 工 程 另 存 為 說 明 ： （ 1） 保 存 工 程 文 件 時 ， VB還 將 自 動 保 存 與 工 程 有 關(guān) 的 修 改 過 的 窗 體 或 標準 模 塊 等 文 件 。 （ 2） VB可 以 同 時 打 開 多 個 工 程 ， 構(gòu) 成 工 程 組 ， 工 程 組 文 件 擴 展 名為 .vbg。 使 用 工 程 組 對 調(diào) 用 ActiveX控 件 很 有 用 。 通 過 “ 文 件 ” 菜 單 的 “ 添 加工 程 ” 向 當 前 工 程 添 加 附 加 工 程 ； 通 過 “ 刪 除 工 程 ” ， 可 以 從 當 前 工 程 組 刪除 一 個 工 程 。 （ 3

48、） 單 個 窗 體 或 模 塊 文 件 可 以 在 幾 個 工 程 文 件 間 共 享 ， 對 一 個 工 程 中的 窗 體 或 模 塊 所 作 的 改 變 ， 會 影 響 到 共 享 該 模 塊 的 所 有 工 程 。 2.6.3 添 加 、 刪 除 和 保 存 文 件 1、 工 程 菜 單 2、 文 件 菜 單 說 明 ： （ 1） 窗 體 名 和 窗 體 文 件 名 是 不 同 的 概 念 。 窗 體 名 是 窗 體 文 件 的 Name屬 性 ， 在 程 序 中 可 用 窗 體 名 稱 來 引 用 窗 體 ， 同一 工 程 中 的 多 個 窗 體 不 能 同 名 ； 窗 體 文 件 名

49、 是 窗 體 文 件 存 放 在 磁 盤 上 的 文 件 名 ， 該 文 件 包 含 了 窗 體 上 所有 控 件 的 屬 性 和 控 件 事 件 過 程 代 碼 ， 同 一 工 程 中 不 能 有 相 同 的 窗 體 文 件 名 ； （ 2） 在 工 程 添 加 文 件 時 ， 系 統(tǒng) 只 是 將 對 于 該 現(xiàn) 存 文 件 的 引 用 納 入 工 程 ，而 不 是 復 制 到 工 程 中 。 故 如 添 加 進 工 程 后 文 件 更 改 后 保 存 ， 將 會 影 響 包 含 此 文件 的 任 何 工 程 。 （ 3） 在 工 程 中 刪 除 文 件 ， VB將 在 保 存 此 工 程

50、時 更 新 工 程 文 件 中 的 這 一 信息 ， 文 件 雖 從 工 程 中 刪 除 了 ， 但 該 文 件 仍 保 存 在 磁 盤 上 。 2.6.3 添 加 、 刪 除 和 保 存 文 件 （ 4） 對 工 程 中 的 文 件 改 名 ： 方 法 一 ： 將 窗 體 文 件 “ 另 存 為 ” 規(guī) 定 的 文 件 名 后 ， 再 將 原 文 件 名 的 文 件刪 除 ； 方 法 二 ： 在 文 件 夾 中 將 該 文 件 重 新 命 名 后 ， 再 在 文 本 編 輯 器 中 打 開 工 程文 件 ， 修 改 其 中 的 “ form *.frm” 語 句 。 （ 5） 若 工 程 中 包 含 多 個 窗 體 ， 則 必 須 指 定 啟 動 窗 體 。 VB菜 單 工 程 工 程 1屬 性 2.6.4 工 程 環(huán) 境 設 置 打 開 “ 工 具 ” 菜 單 下 的 “ 選 項 ” 命 令 ： 1、 “ 編 輯 器 ” 選 項 卡 ： 用 于 設 置 代 碼 窗 口 和 工 程 窗 口 的 一 些 特 殊屬 性 。 2、 “ 通 用 ” 選 項 卡 ： 為 當 前 的 VB工 程 設 置 窗 體 網(wǎng) 格 信 息 ， 錯 誤 處理 方 式 以 及 編 譯 方 式 。