在一些資訊管理資訊中, 有時需要在使用者表單中顯示圖像。 這時可使用VBA提供的“圖像”控制項。 使用圖像控制項可剪裁圖片、調整圖片大小或縮放圖片, 但不能編輯圖片的內容。
標籤控制項也可以顯示圖片, 但標籤不支援對圖片的剪裁、調整大小或縮放操作。
與標籤控制項用來顯示提示文字類似, 圖像控制項一般也用來顯示圖片。 圖像控制項也支援很多事件, 常用的為按一下事件和按兩下事件, 可回應使用者對圖像控制項的按一下或按兩下操作。
下面以一個“首次出現的歡迎視窗”為例為說明圖像視窗的使用。
1.jpg2 編寫表單代碼
Private Sub UserForm_Activate()
Application.OnTime Now + TimeValue("00:00:05"), "CloseSplash"
End Sub
Private Sub Image1_Click()
Unload Me
End Sub
3 在一個新模組中編寫卸載表單的代碼Public Sub CloseSplash()
Unload frmSplash
End Sub
4 編寫工作簿事件代碼Private Sub Workbook_Open()
frmSplash.Show
End Sub
當工作簿打開時, 即可顯示定義的歡迎視窗, 5秒或按一下後退出此表單:
-End-