【正文】 對本例而言 ， 是保存包括窗體文件 *.Frm的工程文件 *.Vbp。 將 Command2顯示 ? = True 39。 設置 Label2的字體為 12磅 ? = “黑體 ” 39。 將 Command1不顯示 ? = False 39。 圖 123 程序的界面設計 圖 124 程序運行最初界面 編寫相關事件的代碼 ? 在設計窗口，雙擊命令按鈕進入代碼編輯窗口編寫程序代碼，或通過 “ 資源管理窗口 ” 的 “ 查看代碼 ” 按鈕，也可以進入代碼窗口。 表 13 各對象控件的屬性設置 對象默認名 設置對象名稱 （“ Name”屬性） 標題屬性 （“ Caption”屬性） 其他屬性 Form1 使用對象默認名 一個簡單的 VB程序 Text1 無定義 Text為空串 Label1 你好！請輸入你的姓名 Label2 空 串 AutoSize=True， Visible = False Command1 確 定 Command2 繼 續(xù) Visible = False Command3 結 束 Visible = False 程序界面設計 ? 按表 13設置好控件屬性 ， 并調(diào)整好各控件的位置 ， 如圖 123所示 。 新建工程 ? 啟動 Visual Basic ， 將出現(xiàn) “ 新建工程 ” 對話框（如圖 11所示），從中選擇 “ 標準 EXE”， 單擊 “ 打開 ” 按鈕，即進入Visual Basic的 “ 設計工作模式 ” ，這時 Visual Basic創(chuàng)建了一個帶有單個窗體的新工程。 ? 文本框常用到 Change事件 、 LostFocus事件和 KeyPress事件 。 一個簡單的 Visual Basic程序的創(chuàng)建實例 ? 3． 文本框 ? 文本框 （ TextBox） 通常用于顯示用戶輸入的信息 ， 作為接受用戶輸入數(shù)據(jù)的接口；也可以在設計或運行時 ， 通過對控件的 Text屬性賦值 。 ? 命令按鈕的基本屬性： Name、 Height、 Width、 Top、 Left、Enabled、 Visible、 Font等 ， 與窗體的使用相同 ， 顯示在命令按鈕上的信息是標題屬性 （ Caption屬性 ） 。 ? 例 15 設計一個程序 ， 當程序運行后 ， 在窗體的正中間顯示“ 你好 ！ 請輸入你的姓名 ” ， 焦點定在其下的文本框中 （ 如圖 121所示 ） ， 當用戶輸入姓名并單擊 “ 確定 ” 按鈕后 ， 在窗體中用黑體 、 12磅 、 紅色字顯示 “ XXX同學 ， 你好 ！ 祝你學好 VB程序設計 ” ， 同時窗體上出現(xiàn)兩個命令按鈕 “ 繼續(xù) ” 和 “ 結束 ” ， 其中 “ XXX”是用戶輸入的姓名 ， 例如 ， 當用戶輸入 “ 王五 ” ， 單擊 “ 確定 ” 按鈕后 ， 就會出現(xiàn)如圖 122所示的界面 ， 如果單擊“ 繼續(xù) ” 按鈕 ， 則又回到初始運行狀態(tài)；單擊 “ 結束 ” 按鈕即結束程序運行 。 測試所編程序 ， 若運行結果有錯或?qū)τ脩艚缑娌粷M意 ， 則可通過前面的步驟修改 ， 繼續(xù)測試直到運行結果正確 、 用戶滿意為止 ， 再次保存修改后的程序 。 通過代碼窗口為對象的相關事件編寫代碼 。 ? (3) 設置屬性值 。 例如 ， 在 DblClick事件發(fā)生時 ， Click、MouseDown和 MouseUp事件也會發(fā)生 。 ? 事件是窗體或控件所能識別的動作 。 該文件是可選項 。 標準模塊只包含代碼 ， 而類模塊既包含代碼又包含數(shù)據(jù) ， 可視為沒有物理表示的控件 。 ? (2) 標準模塊是由那些與特定窗體或控件無關的代碼組成的另一類型的模塊 。 其中工程文件 （ *.Vbp） 用來管理構成應用程序的所有文件 ，如：窗體文件 （ .Frm） 、 標準模塊文件 （ .Bas） 、 類模塊文件（ .Cls） 等等 ， 它們的關系如圖 120所示 。 Visual Basic的啟動對象可以是任何一個窗體 ， 也可是一個用戶定義的主過程 Sub main， 該過程必須寫在標準模塊中 。 通過調(diào)用 Unload方法實現(xiàn) 。 ? (3) 運行時顯示窗體 。 選擇 “ 工程 ” 菜單中 “ 添加窗體 ” 命令 ，Visual Basic將顯示如圖 115所示的窗口；選擇 “ 窗體 ” 后單擊“ 打開 ” 按鈕即添加了新窗體 。 重現(xiàn)窗體 ? End Sub ? 窗體還有 Line、 Pset、 Circle 和 Refresh等方法 ， 這些方法將在第 6章詳細討論 。 窗體的方法 ? 例 14 實現(xiàn)將指定的窗體在屏幕上進行顯示或隱藏的切換 。 窗體的方法 ? 5． Hide（ 隱藏 ） 方法 ? Hide方法用于使指定的窗體不顯示 ， 但不從內(nèi)存中刪除窗體 。 ? 其調(diào)用格式如下： ? 窗體名 .Show [vbModal | vbModeless] ? 【 說明 】 ? (1) 該方法有一個可選參數(shù) ， 它有兩種可能值： vbModal或vbModeless， 若未指定參數(shù) ， 則缺省為 vbModal。 例如 ， 允許只指定 Left和 Top， 而省略 Width和 Height， 此時窗體的寬度和高度在移動后保持不變 。 窗體的方法 ? 3． Move（ 移動 ） 方法 ? Move方法用來在屏幕上移動窗體 ， 它有如下格式： 窗體名 .Move Left[,Top[,Width[,Height]]] ? 其中 ， Left、 Top、 With、 Height均為單精度數(shù)值型數(shù)據(jù) ， 分別用來表示窗體相對于屏幕左邊緣的水平坐標 、 相對于屏幕頂部的垂直坐標 、 窗體的新寬度和新高度 。 窗體的方法 ? 窗體常用的方法有： Print（ 打印輸出 ） 、 Cls（ 清除 ） 、 Show（ 顯示 ） 、 Hide（ 隱藏 ） 以及 （ Move） 移動等 。 窗體的事件 ? 3． Load事件 ? 在程序運行時 ， 當窗體被裝入工作區(qū)時 ， 將觸發(fā)它的 Load事件 ， 所以該事件通常用來在啟動應用程序時對控件屬性和變量初始化 。 窗體的事件 ? 與窗體有關的事件較多 ， Visual Basic 30多個 ， 讀者只需掌握一些常用事件 ， 了解這些事件的觸發(fā)機制 。 屬性值 說 明 數(shù)值 系統(tǒng)常量 0 VbNormal 正常窗口狀態(tài) ， 有窗口邊界 1 vbMinimized 最小化狀態(tài) ， 以圖標方式運行 2 vbMaximized 最大化狀態(tài) ， 無邊框 ， 充滿整個屏幕 窗體的屬性 ? 注意： ? 在窗體 Load事件中如果要使用 Print方法在窗體上打印輸出，就必須先將窗體的 AutoRedraw屬性設置為True； 否則窗體啟動后將沒有輸出結果。 可以改變窗體大小 ， 顯示 “ 關閉 ” 按鈕并用縮小的字體顯示標題欄 ， 窗體不在任務欄中顯示 表 11 窗體對象 BorderStyle屬性的取值及意義 窗體的屬性 ? 14． WindowsState屬性 ? 設置窗體運行的狀態(tài) ， 它可取 3種值 ， 對應于 3種狀態(tài) ， 如表 12所示 。 可以包含控制菜單框 、 標題欄 、 “ 最大化 ” 按鈕和 “ 最小化 ” 按鈕 。 窗體的屬性 ? 12． Picture圖片屬性 ? 設置窗體中要顯示的圖片 。 ? 它等價于： = vbRed 窗體的屬性 ? 9． MaxButton——“最大化 ” 按鈕和 MinButton——“最小化 ” 按鈕 ? 當其值為 Ture時 ， 有 “ 最大化 ” 或 “ 最小化 ” 按鈕；其值為False時 ， 則無 。 ? 8． BackColor屬性和 ForeColor屬性 ? BackColor屬性用于返回或設置對象的背景顏色 ， ForeColor屬性用于返回或設置在對象里顯示圖片和文本的前景顏色 ， 它們是十六進制長整型數(shù)據(jù) ， 在 Visual Basic中通常用 Windows運行環(huán)境的紅 綠藍 （ RGB） 顏色方案 ， 使用調(diào)色板或在代碼中使用 RGB或 QBColor函數(shù)指定標準 RGB顏色 。 查看文本框是否為空 ? = False 39。 uFontUnderLine屬性是邏輯型 ， 決定對象上正文是否帶下劃線 （ 缺省為 False） 。 uFontSize屬性是整型 ， 決定對象上正文的字體大小 （ 缺省為 9磅 ） 。 ? = ( )/2 ? 39。 設 置 窗 體 的 寬 度 ，Screen為屏幕對象 ? = 39。 ? 圖 114是屏幕 （ Screen） 、 窗體 （ Form1） 和命令按鈕 （ Ok）的 Left、 Top、 Height、 Width屬性表示 ， 讀者要注意 Left、 Top屬性值是相對 “ 容器 ” 左上角的坐標值 。 對于控件 ， Left、 Top屬性值則是相對 “ 容器 ” 左上角的坐標值 ， 其缺省單位是 twip。 首次在工程中添加窗體時 ， 該窗體的名稱被缺省為 Form1； 添加第二個窗體 ， 其名稱被缺省為Form2， 依此類推 。 ? 建立新窗體后 ， 它的大小 、 背景顏色 、 標題及窗體名稱等特征需要根據(jù)應用程序的要求進行設置 。 ? 當一個對象察覺到某一事件發(fā)生時 （ 如 Click等 ） ， 就會對事件產(chǎn)生響應 ， 即執(zhí)行一段程序代碼 ， 所執(zhí)行的這段程序代碼就稱為事件過程 。 ? 每個控件都可以對一個或多個事件進行識別和響應 ， 如窗體加載事件 （ Load） 、 鼠標單擊事件 （ Click） 、 鼠 標 雙 擊 事 件（ DblClick） 等 。 在 Visual Basic中已將一些通用的過程和函數(shù)編寫好并封裝起來 ， 作為方法供用戶直接調(diào)用 ， 這給用戶的編程帶來了極大的方便 。 ? 控件屬性的設置一般有兩條途徑： ? (1) 如果在界面設計時設置對象的屬性 ， 需要使用屬性窗口 。 屬性是用來描述和反映對象特征的參數(shù) 。 屬于同一類的所有對象具有同一組屬性 、 方法與事件 ， 只是其屬性值不同 ， 對事件的響應不同 （ 取決于程序員的編程 ） 。 ? 在 Visual Basic ， 對象可以由系統(tǒng)設置好 ， 直接供用戶使用 ，也可以由程序員自己設計 。 ? 在 Visual Basic環(huán)境中 ， 程序員不僅可以利用控件來創(chuàng)建對象 ，而且還可以建立自己的控件 ， 這是 Windows環(huán)境下編程的新概念 。 ? Visual Basic采用的是面向?qū)ο?、 事件驅(qū)動的編程機制 。通常使用是 Print方法，使用格式為： ? [輸出項列表 ] ? 例如： “VB程序設計 ” ? 運行后在立即窗口輸出： ? VB程序設計 ? 在設計狀態(tài)可以在立即窗口中進行一些簡單的命令操作，如變量賦值，用 “ ？ ” 或 Print（ 兩者等價）輸出一些表達式的值。 輸出結果 ? Not P Or K And P Or YZ False 39。 圖 110 代碼編輯器窗口 立即窗口 ? 例如： ? (1) 在立即窗口中使用賦值符給變量賦值 。圖 18顯示了桌面上兩個窗體放置及其相對位置。在 Visual Basic ，屬性窗口列出了當前選定窗體或控件的屬性及其值，用戶可以對這些屬性值進行設置。 ? (1) 單擊 “ 查看代碼 ” 按鈕 ， 可打開 “ 代碼編輯器 ”查看代碼 。要將某控件加入到當前選項卡中，需單擊要選定控件前面的方框，如圖 15所示，然后單擊 “ 確定 ” 按鈕，選定的 ActiveX控件就會添加到工具欄中。 應注意窗體名即窗體的“ Name”屬性和窗體文件名的區(qū)別。 Windows的應用程序運行后都會打開一個窗口，窗體設計窗口是應用程序最終面向用戶的窗口，是屏幕中央的主窗口。 工具欄緊貼在菜單欄下方 ，或以垂直條狀緊貼在左邊框上 ， 如圖 13所示 。 Visual Basic ? 3． 工具欄 ? 工具欄在編程環(huán)境下提供對于常用命令的快速訪問 。 缺省時這個菜單中只有 “ 可視化數(shù)據(jù)管理器 ” 選項 。 (8) 查詢：包含操作數(shù)據(jù)庫表時的查詢命令以及其他數(shù)據(jù)訪問命令 。 (4) 工程：包含在工程中添加構件 、 引用 Windows對象和工具箱新工具的命令 。它除了提供標準 “ 文件 ” 、 “ 編輯 ” 、 “ 視圖 ” 、 “ 窗口 ”和 “ 幫助 ” 菜單之外，還提供了編程專用的功能菜單，如 “ 工程 ” 、“ 格式 ” 、 “ 調(diào)試 ” 、 “ 外接程序 ” 等菜