實驗十? VB的窗體
一、實驗目的
(1)掌握VB6．0窗體的常用屬性、常用事件和重要方法。
(2)掌握在Visual Basic6．0窗體上生成控件的方法。
(3)掌握設置啟動窗體的方法。
(4)了解窗體的生命周期。
二、相關知識
1、窗體是VB中的對象，具有自己的屬性、事件和方法。
●? 屬性：窗體的屬性決定了窗體的外觀和操作。窗體屬性既可以在程序設計時在“屬性”窗口中手工設置，也可以在程序運行時由代碼來實現。
●? 常用事件：窗體常用的事件有Load、Click、DblClick、Activate和Deactivate等。其中Load事件是當窗體被裝入工作區時觸發的事件，常用來在啟動應用程序時對屬性和變量進行初始化。Activate是當一個窗體成為活動窗口時所觸發的事件，Deactivate是當另一個窗體或應用程序被激活時，當前窗體所發生的事件。
●? 常用方法：窗體的方法很多，其中許多方法都調用文本和圖形，用于直接在窗體表面上輸出、寫或畫，如：Print、Circle等。還有一些方法對窗體的行為產生影響，如Show方法使—個窗體可見；Hide方法用于隱藏一個窗體。
2、在窗體上添加控件
??? 窗體是設計VB應用程序的一個基本平臺，幾乎所有的控件都是添加在窗體上的。對于生成的控件，可以調整控件大小、移動控件位置、使用網格精確定位控件；對于多個控件，還可以對它們進行排列、調整大小等操作。另外，在VB中還允許可視地創建和編輯控件數組，這對于編組使用選擇框、命令按鈕等控件提供了很大方便。
3、設置啟動窗體
在默認情況下，應用程序中的第一個窗體被指定為啟動窗體。應用程序開始運行時，此窗體就被顯示出來。如果想在應用程序啟動時顯示別的窗體，可以將其他窗體設置為啟動窗體。
4、窗體的生命周期
??? VB窗體在整個存活期中有4種狀態，即創建狀態、加載狀態、可見狀態和卸載狀態。一些程序運行所必須的初始化操作和退出前的善后工作(例如退出應用程序前提示存盤)，往往要在窗體創建以及退出時被激活的事件過程中進行。
三、實驗舉例
(實例1)? 窗體的屬性設置。
? 建立一個新的工程，并按表10-1內容設置窗體屬性。
表10-1? 窗體的屬性
(名稱)屬性?Caption?Picture?MaxButton?MinButton?ControlBox
FrmExpl?窗體屬性設置?圖片文件?False?False?true
??? 設置Icon屬性，選中此屬性，單擊“Icon”屬性框右邊的…(省略號)，打開—個“加載圖標”對話框。在該對話框中選擇VB安裝目錄下的vb6＼Common＼Graphics\Icons文件夾，從中選擇某一個圖標文件，并按“確定”按鈕裝入。
??? 設置picture屬性，選中此屬性，單擊“picture”屬性框右邊的…(省略號)，打開—個“加載圖片”對話框。在該對話框中選擇某文件夾下的一個圖片文件，并按“確定”按鈕裝入。
??? 單擊工具欄上的啟動按鈕?運行程序。此時觀察窗體界面，標題欄左側的控制菜單框圖標為剛剛選定的圖標，在窗體最小化時也以該圖標顯示。
??? 在此基礎上，將窗體的ControlBox屬性設為False，再運行程序，則結果怎樣？
●? Moveable屬性：選中此屬性，在右邊列中選擇“False”，然后，用鼠標單擊工具欄 上的啟動按鈕?運行程序。此時窗體為不可移動狀態，用鼠標不能拖動窗口。
●? Borderstyle屬性：選中此屬性，在右邊列中選擇“1一Fixed Single”，然后單擊啟動按鈕?運行程序。觀察界面，此時窗體邊框為可調狀態還是不可調狀態？①
●? ShowinTaskbar屬性：在窗體的controlbox屬性為true的情況下，選中此屬性時，右邊列中默認值為“True”。單擊工具欄上的啟動按鈕?運行程序，發現該程序圖標出現在Windows任務欄中，單擊工具欄上的結束按鈕■，或單擊窗口的關閉按鈕，結束程序運行。重新設置ShowInTaskbar屬性值為“False”，然后再一次運行程序，發現該程序沒出現在Windows任務欄中。
(實例2)? 窗體的常用事件。
? 建立一個新的工程，將窗體的(名稱)屬性設為“FrmExp2”，在窗體上建立一個Picturebox控件，(名稱)屬性默認為“Pictureboxl”。
??? (1)Load事件
??? Load事件通常用來在啟動應用程序時對屬性或變量進行初始化
??? 在Load事件過程編寫代碼如下：
Private Sub Form_Load()
??? FrmExp2．CaptiOn=”窗體Load事件”
??? Picturel．Picture=LoadPicture(”C：＼windows＼Clouds．bmp”)
End Sub??
?? 運行程序。此時窗口標題欄為“窗體Load事件”、窗體中顯示出什么，這說明了什么？②
??? (2)Click事件
??? 為窗體的Click事件過程編寫代碼如下：
Private Sub Form_Click()
FrmExp2．Caption=? ”窗體click事件”
??? Picture1．Picture? =? LoadPicture(””)
End Sub
??? 運行程序。此時窗體標題欄仍為“窗體Load事件”，這說明在啟動應用程序時先觸發的是Load事件。用鼠標單擊窗體，此時窗體標題欄變為“窗體click事件”、窗體中Picturebox中的圖片被清除，說明單擊窗體時，觸發了Click事件。