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