第一章VB之概論 - 正修科技大學

Mental HealthNH Grand Hotel KrasnapolskyDavid N. WeisstubChairUniversité de Montréal/Institut Philippe-Pinel3

•§1 – 3 VB 之 解 安 裝學 會 了 Visual BASIC 的 安 裝 後 , 如 果 當 我 們 的 硬 碟 空間 不 足 或 者 其 他 因 素 而 不 得 不 移 除 Visual BASIC 時 ,想 必 一 定 會 想 移 除 Visual BASIC, 為 了 怕 初 學 者 不 會照 正 常 手 序 移 除 , 所 以 在 此 將 完 整 的 介 紹 VisualBASIC 移 除 的 正 常 程 序 。1. 首 先 先 點 選 WINDOWS 左 下 角 的 〝 開 始 〞, 接 著 在 點選 〝 設 定 〞 下 的 〝 控 制 台 〞。2. 連 點 兩 下 〝 控 制 台 〞 內 的 〝 新 增 / 移 除 程 式 〞, 尋 找Microsoft Visual BASIC 6.0 , 然 後 再 對 它 連 點 兩 下 。3. 接 著 就 會 進 入 Visual BASIC 的 安 裝 程 式 了 。( 如 下 圖 )正 修 技 術 學 院土 木 工 程 系2002/9/24 25/84•§1 – 3 VB 之 解 安 裝8. 請 點 選 按 鈕 〝 是 〞。 接 著 就 會 自 動 進 行 移 除了 。9. 移 除 完 畢 後 , 會 再 出 現 一 次 提 醒 視 窗 , 這 個 提醒 視 窗 告 訴 我 們 〝 您 需 要 重 新 啟 動 Window 以完 成 移 除 手 續 〞, 之 後 點 選 按 鈕 〝 重 新 啟 動Windows〞10. 等 到 電 腦 重 新 啟 動 完 畢 後 , 就 完 成 了 VisualBASIC 6.0 的 移 除 。正 修 技 術 學 院土 木 工 程 系2002/9/24 27/84•VB入 門 :在 VB 環 境 下 , 最 上 方 的 這 一 個 視 窗 , 它 就是 稱 為 IDE( 整 合 發 展 環 境 ), 它 提 供 了 一 些 寫 程式 時 所 需 要 的 功 能 , 如 存 檔 、 執 行 、 載 入 物 件等 功 能 。•§1 – 3 VB 之 解 安 裝4. 在 這 個 程 式 下 , 首 先 在 這 個 程 式 下 有 四 個 按 鈕 , 依 按鈕 上 的 字 面 解 釋 分 別 是 〝 新 增 / 移 除 程 式 〞、〝 重 新安 裝 〞、〝 全 部 移 除 〞 與 〝 離 開 安 裝 程 式 〞。5. 這 個 選 單 可 以 幫 助 你 依 你 的 需 要 來 執 行 , 新 增 / 移 除程 式 : 從 目 前 程 式 中 增 加 新 的 元 件 , 或 移 除 已 安 裝的 元 件 的 ; 重 新 安 裝 : 重 複 上 一 個 安 裝 程 序 , 以 便將 遺 失 檔 案 和 設 定 值 還 原 回 來 ; 全 部 移 除 : 移 除 所有 之 前 安 裝 過 的 元 件 。6. 接 下 來 我 們 點 選 〝 全 部 移 除 〞 這 個 按 紐 。7. 接 著 會 出 現 一 個 提 醒 視 窗 詢 問 你 是 否 要 移 除 VisualBASIC 6.0 。( 如 下 圖 )正 修 技 術 學 院土 木 工 程 系2002/9/24 26/84•§1 – 4 VB 之 工 作 環 境 介 紹在 VB 環 境 下 , 最 上 方 的 這 一 個 視 窗 , 它 就是 稱 為 IDE( 整 合 發 展 環 境 ), 它 提 供 了 一 些 寫 程式 時 所 需 要 的 功 能 , 如 存 檔 、 執 行 、 載 入 物 件等 功 能 。正 修 技 術 學 院土 木 工 程 系2002/9/24 28/84•VB入 門 :Zeon PDF Driver Trialwww.zeon.com.twVB 的 左 邊 可 以 看 到 這 一 個 視窗 , 這 一 個 視 窗 裡 裝 載 了 許 多 可 用的 物 件 , 如 果 我 們 的 程 式 需 要 什 麼物 件 時 , 可 以 從 這 個 工 具 箱 到 表 單上 安 置 。正 修 技 術 學 院土 木 工 程 系正 修 技 術 學 院土 木 工 程 系2002/9/24 29/842002/9/24 30/845

•VB入 門 :常 用 屬 性 的 介 紹 (5)IndexHeightMouseIconMousePointerName物 件 陣 列 的 編 號 , 屬 性 為 空 白 不 為 物 件 陣 列 , 屬 性 指 定 數 值 時 為陣 列 物 件物 件 的 高 度載 入 物 件 的 自 定 游 標指 定 物 件 的 滑 鼠 游 標 種 類 ( 預 設 :0)物 件 的 名 稱正 修 技 術 學 院土 木 工 程 系2002/9/24 37/84•VB入 門 :常 用 屬 性 的 介 紹 (7)StyleTextTabIndexTabStopTag物 件 所 提 供 的 樣 式物 件 的 文 字 內 容焦 點 移 動 的 順 序False: 按 Tab 鍵 不 能 把 焦 點 移 到 這 裡 ,True: 按 Tab 鍵 能 把 焦 點 移 到 這 裡物 件 標 籤 , 隨 意 讓 你 存 放 你 自 己 的 資 料正 修 技 術 學 院土 木 工 程 系2002/9/24 39/84•VB入 門 :工 具 箱 之 控 制 元 件 介 紹 (1)標 籤 (Label)指 標 (Pointer):圖 片 盒 (PictureBox)用 來 顯 示 字 串 , 標 籤 的 功 用 。他 主 要 是 用 來 移 動 表 格 、 控 制 元 件 , 或 是用 於 更 改 表 格 或 控 制 元 件 的 大 小 。用 來 顯 示 圖 形 , 也 可 以 顯 示 文 件 , 或 是 將其 他 的 控 制 元 件 放 在 這 個 圖 片 盒 內 。•VB入 門 :常 用 屬 性 的 介 紹 (6)OLEDropModePictureScaleHeightScaleModeScaleWidth是 否 可 以 直 接 用 滑 鼠 拖 曳 資 訊 到 物 件 裡物 件 所 顯 示 的 圖 片物 件 的 工 作 範 圍 高 度物 件 的 座 標 尺 度 種 類物 件 的 工 作 範 圍 寬 度正 修 技 術 學 院土 木 工 程 系2002/9/24 38/84•VB入 門 :常 用 屬 性 的 介 紹 (8)ToolTipTextTopValueVisibleWidth物 件 的 快 速 說 明物 件 頂 端 的 座 標物 件 所 儲 存 的 數 值False: 物 件 於 執 行 階 段 裡 不 被 顯 示 ,True: 物 件 於 執 行 階 段 裡 被 顯 示( 預 設 )物 件 的 寬 度正 修 技 術 學 院土 木 工 程 系2002/9/24 40/84•VB入 門 :工 具 箱 之 控 制 元 件 介 紹 (2)Zeon PDF Driver Trialwww.zeon.com.tw命 令 鈕 (CommandButton)核 對 盒 (CheckBox)選 項 鈕 (OptionButton供 建 立 一 個 按 鈕 , 當 使 用 者 按 此 功 能 鈕 時 , 將可 以 執 行 寫 在 功 能 鈕 的 程 式 碼 。選 擇 yes 或 是 no 的 一 個 控 制 元 件 。建 立 一 選 項 , 但 在 一 系 列 的 選 項 中 , 只 能 選 擇一 個 按 鈕 。文 字 編 修 框 (TextBox)框 架 (Frame)提 供 使 用 者 輸 入 和 顯 示 資 料 。建 立 框 架 , 使 應 用 程 式 有 條 理 。雙 併 盒 (ComboButton)列 表 盒 (ListBox)可 以 用 於 包 含 列 表 (List) 性 質 和 文 字 (Text) 性 質的 方 框 。 使 用 者 可 以 在 雙 併 盒 內 直 接 輸 入 數 值或 在 列 表 中 選 擇 。可 用 於 顯 示 列 表 性 質 的 資 料 項 。 但 是 它 和 雙 併盒 不 同 的 是 它 無 法 由 使 用 者 輸 入 數 值 。正 修 技 術 學 院土 木 工 程 系正 修 技 術 學 院土 木 工 程 系2002/9/24 41/842002/9/24 42/847

•§1 – 6 VB 之 基 本 語 法 列 示B. 一 元 二 次 方 程 式 用 到 之 基 本 語 法1.If2.Then3.GoTo4.Sqr正 修 技 術 學 院土 木 工 程 系2002/9/24 49/84•§1 – 6 VB 之 基 本 語 法 列 示D. 其 他 應 用 程 式 用 到 之 基 本 語 法1.Integer2.Single3.String4.Print5.Round正 修 技 術 學 院土 木 工 程 系2002/9/24 51/84•§1 – 6 VB 之 基 本 語 法 列 示E. 其 他 之 基 本 語 法 ( 依 英 文 字 母 排 列 )1.Abs2.Asc3.Atn4.Beep5.Call•§1 – 6 VB 之 基 本 語 法 列 示C. 半 對 數 座 標 程 式 用 到 之 基 本 語 法1.CLS2.For ……Next3.Scale4.Step5.Log正 修 技 術 學 院土 木 工 程 系2002/9/24 50/84•§1 – 6 VB 之 基 本 語 法 列 示D. 其 他 應 用 程 式 用 到 之 基 本 語 法6.On Error GoTo7.Const8.Spc9.Append10.Exit Sub正 修 技 術 學 院土 木 工 程 系2002/9/24 52/84•§1 – 6 VB 之 基 本 語 法 列 示Zeon PDF Driver Trialwww.zeon.com.twE. 其 他 之 基 本 語 法 ( 依 英 文 字 母 排 列 )6.Chr[$]7.Const8.Cos9.Date[$]10.Declare正 修 技 術 學 院土 木 工 程 系正 修 技 術 學 院土 木 工 程 系2002/9/24 53/842002/9/24 54/849

•§1 – 6 VB 之 基 本 語 法 列 示E. 其 他 之 基 本 語 法 ( 依 英 文 字 母 排 列 )11.Do…….Loop12.End13.Exit14.Exp15.Function正 修 技 術 學 院土 木 工 程 系2002/9/24 55/84•§1 – 6 VB 之 基 本 語 法 列 示E. 其 他 之 基 本 語 法 ( 依 英 文 字 母 排 列 )21.Line Input22.Loc23.LOF24.Log25.Mid正 修 技 術 學 院土 木 工 程 系2002/9/24 57/84•§1 – 6 VB 之 基 本 語 法 列 示E. 其 他 之 基 本 語 法 ( 依 英 文 字 母 排 列 )31.PSet32.Rem33.Resume34.Right35.Rnd•§1 – 6 VB 之 基 本 語 法 列 示E. 其 他 之 基 本 語 法 ( 依 英 文 字 母 排 列 )16.Global17.GoSub….Return18.Left[$]19.Len20.Let正 修 技 術 學 院土 木 工 程 系2002/9/24 56/84•§1 – 6 VB 之 基 本 語 法 列 示E. 其 他 之 基 本 語 法 ( 依 英 文 字 母 排 列 )26.Minute27.Mod28.Month29.On…..GoSub, On…..GoTo30.Point正 修 技 術 學 院土 木 工 程 系2002/9/24 58/84•§1 – 6 VB 之 基 本 語 法 列 示Zeon PDF Driver Trialwww.zeon.com.twE. 其 他 之 基 本 語 法 ( 依 英 文 字 母 排 列 )36.RSet37.Second38.Select Case39.Sqn40.Shell正 修 技 術 學 院土 木 工 程 系正 修 技 術 學 院土 木 工 程 系2002/9/24 59/842002/9/24 60/8410

【 圖 3】【 圖 4】正 修 技 術 學 院土 木 工 程 系2002/9/24 67/84【 圖 5】【 圖 6】正 修 技 術 學 院土 木 工 程 系2002/9/24 69/84•§1 – 7 加 減 乘 除 VB 程 式 設 計 入 門3. 插 入 Command Bottom 物 件將 滑 鼠 游 標 移 到 VB 的 Command Button( 按 鈕 ) 上 ,Command button 的 圖 像 如 【 圖 5】。 把 滑 鼠 游 標 移 到 你所 需 要 的 物 件 (Command button) 圖 形 上 , 然 後 在 該 物 件圖 形 上 用 滑 鼠 點 一 下 , 當 某 圖 形 呈 現 陷 下 形 狀 時 表 示正 要 拖 曳 一 個 新 物 件 。 利 用 【 圖 5】 選 取 黃 色 框 框(Command button) 並 在 表 單 下 面 繪 製 出 所 有 須 要 讓 使 用者 執 行 的 物 件 , 如 【 圖 6】。正 修 技 術 學 院土 木 工 程 系2002/9/24 68/84•§1 – 7 加 減 乘 除 VB 程 式 設 計 入 門4. 更 改 各 物 件 之 屬 性連 一 下 表 單 上 的 每 一 個 物 件 ( 一 個 一 個 點 ), 在 螢幕 的 右 下 角 會 出 現 該 物 件 的 屬 性 一 視 窗 ; 如【 圖 7、8、9】 由 黃 色 的 框 框 來 修 改 表 單 上 的 文字 , 使 它 們 不 在 呈 現 出 , 如 :Text1、Label1、Command1…. 等 , 修 改 完 後 如 【 圖 10】正 修 技 術 學 院土 木 工 程 系2002/9/24 70/84Zeon PDF Driver Trialwww.zeon.com.tw【 圖 7】 【 圖 8】【 圖 9】正 修 技 術 學 院土 木 工 程 系【 圖 10】這 樣 我 們 的 表 單 雛 型 大 致 上 就 完 成 了 。正 修 技 術 學 院土 木 工 程 系2002/9/24 71/842002/9/24 72/8412

•§1 – 7 加 減 乘 除 VB 程 式 設 計 入 門5. 撰 寫 程 式 碼 :5-1 Command Bottom 之 執 行 程 式因 為 我 們 的 程 式 按 鈕 共 有 三 個 , 所 以 我 們 先 由 〝 執 行 程式 〞 的 按 鈕 開 始 。 首 先 我 們 先 連 點 兩 下 〝 執 行 程 式 〞 的 按 鈕 ,如 【 圖 11】; 接 著 會 出 現 一 個 視 窗 , 那 便 是 要 撰 寫 〝 執 行 程式 〞 這 個 按 鈕 程 式 碼 的 地 方 , 如 【 圖 12】; 接 下 來 我 就 開 始 寫〝 執 行 程 式 〞 的 程 式 碼 , 我 們 知 道 Text3 這 格 的 東 西 會 等 於 Text1加 Text2( 參 考 圖 6)。Text6 這 格 的 東 西 會 等 於 Text4 減 Text5( 參 考 圖 6)。Text9 這 格 的 東 西 會 等 於 Text7 乘 Text8( 參 考 圖6)。Text12 這 格 的 東 西 會 等 於 Text10 除 Text11( 參 考 圖 6)。 因此 我 們 的 程 式 碼 也 要 根 據 這 些 事 實 來 撰 寫 【 如 圖 13】正 修 技 術 學 院土 木 工 程 系2002/9/24 73/84【 圖 11】2002/9/24 75/84【 圖 13】正 修 技 術 學 院正 修 技 術 學 院土 木 工 程 系土 木 工 程 系Text3.Text = Val(Text1.text) + Val (Text2.text)Text6.Text = Val(Text4.text) + Val(Text5.text)Text9.Text = Val(Text7.text) + Val(Text8.text)Text12.Text = Val(Text10.text) + Val(Text11.text)* 由 於 我 們 的 Text1、Text2、Text3、Text4、Text5、Text6、Text7、Text8、Text9、Text10、Text11、Text12 的 屬 性 都 屬 於Text, 所 以 我 們 必 須 要 都 要 在 後 面 加 上 .Text* 我 們 繪 製 按 鈕 的 目 的 , 就 是 為 了 讓 使 用 者 在 按 下按 鈕 後 , 能 夠 執 行 我 們 程 式 中 的 加 減 乘 除 的 運 算 ,所 以 我 們 的 程 式 碼 理 所 當 然 應 該 寫 在 按 鈕 中正 修 技 術 學 院土 木 工 程 系2002/9/24 74/84【 圖 12】正 修 技 術 學 院土 木 工 程 系2002/9/24 76/84•§1 – 7 加 減 乘 除 VB 程 式 設 計 入 門Zeon PDF Driver Trialwww.zeon.com.tw5-2 Command Bottom 之 清 除 程 式接 著 我 們 來 撰 寫 〝 清 除 〞 按 鈕 的 程 式 碼 , 我 們 先 連 點 兩 下 〝 清除 〞 的 按 鈕 , 接 著 會 出 現 類 似 如 【 圖 12】 的 編 輯 程 式 碼 的 視窗 , 我 們 在 這 個 視 窗 下 輸 入Text3.Text = “”Text6.Text = “”Text9.Text = “”Text12.Text = “”如 【 圖 14】, 目 的 是 為 了 使 答 案 欄 在 按 了 〝 清 除 〞 之 後 會 呈現 空 白 的 欄 位正 修 技 術 學 院土 木 工 程 系2002/9/24 77/842002/9/24 78/8413

【 圖 14】正 修 技 術 學 院土 木 工 程 系2002/9/24 79/84【 圖 15】 最 後 我 們 終 於 完 成 了 範 例 一 的 所 有 程 式 碼 了 。正 修 技 術 學 院土 木 工 程 系2002/9/24 81/84• 第 一 章 參 考 文 獻1. 各 年 度 電 腦 軟 體 設 計 競 賽 試 題2. 戴 松 偉 ,Visual BASIC 入 門 與 實 例 應 用 , 碁 峯 資 訊股 份 有 限 公 司 ,1994.6。•§1 – 7 加 減 乘 除 VB 程 式 設 計 入 門5-3 Command Bottom 之 結 束 程 式最 後 我 們 就 要 來 設 定 〝 程 式 結 束 〞 的 這 個 按鍵 了 , 我 們 先 連 點 兩 下 〝 程 式 結 束 〞 的 按 鈕 ,接 著 會 出 現 類 似 如 【 圖 12】 的 編 輯 程 式 碼 的 視窗 , 我 們 在 這 個 視 窗 下 輸 入 End, 如 【 圖 15】正 修 技 術 學 院土 木 工 程 系2002/9/24 80/84•§1 – 7 加 減 乘 除 VB 程 式 設 計 入 門6. 儲 存 檔 案 :完 成 後 我 們 便 要 儲 存 專 案 了 ,VB 總 共 須 要 存 三 種不 同 的 檔 案 在 算 完 整 ;第 一 步 【 檔 案 】【 儲 存 專 案 】第 二 步 【 檔 案 】【 儲 存 “ 您 的 檔 案 名 稱 ”.frm】第 三 步 【 檔 案 】【 製 成 “ 您 的 檔 案 名 稱 ”.exe】經 過 這 儲 存 三 部 曲 後 VB 的 存 檔 才 算 完 成 !!正 修 技 術 學 院土 木 工 程 系2002/9/24 82/84敬 請 指 導Zeon PDF Driver Trialwww.zeon.com.tw正 修 技 術 學 院土 木 工 程 系正 修 技 術 學 院土 木 工 程 系2002/9/24 83/842002/9/24 84/8414