運行該程序，則窗體如圖4.9所示。可見，在窗體啟動后，窗體的Resize事件就被觸發了。使用鼠標拖動窗體的邊界來改變它的大小，或單擊最大化按鈕使窗體最大化，可以發現，窗體中按鈕的大小也隨著成比例地改變，并且始終處于窗體的中心，如圖4.10所示。

　　由于QueryUnload事件在窗體卸載之前發生，因此，可以通過編寫QueryUnload事件過程來完成一些工作，如文件的保存等。該事件在MDI應用程序中相當重要，這在第七章中還會講到。這里，只是通過一個實例介紹QueryUnload事件的使用。

　　實例4.5窗體的QueryUnload事件

　　打開窗體的【代碼】窗口，在事件列表中選擇QueryUnload事件，則QueryUnload事件過程的框架就出現在代碼編輯區中，形式如下：

　　Private Sub Form_QueryUnload(Cancel As Integer,Unload(Cancel As Integer, UnloadMode As Integer)

　　End Sub

　　其中參數Cancel是一個整數。若在QueryUnload事件過程中給此參數賦一個非零值(True),則將阻止窗體的關閉;若賦0值(False),則將關閉窗體。如果忽略此參數，窗體將被關閉。

　　UnloadMode參數是事件的返回值，它表示引起QueryUnload事件的原因。表4.11中列出了該參數的返回值及其含義。

　　編寫QueryUnload事件過程如下：

　　Private Sub Form_QueryUnload(Cancel As Integer,UnloadMode As Integer)

　　If UnloadMode=0 Then

　　Print“單擊關閉按鈕關閉我，休想!”

　　Cancel=Ture

　　End If

　　End Sub

　　運行該程序，單擊窗體右上角的【關閉】按鈕，窗體并不關閉，并且顯示"單擊關閉按鈕關閉我，休想!",如圖4.11所示。

　　2010年9月計算機等級考試成績查詢時間匯總

　　2011計算機等級考試二級VB考點及習題匯總

　　2011年計算機等級考試二級VB復習指導匯總