㈠ 怎麼設置VB清除按鈕,清除PictureBox里的圖片
可在VB的按鈕事件中可對PictureBox圖片框控制項屬性Picture賦值LoadPicture(),清除裝載在PictureBox圖片框內的圖片。
LoadPicture 函數,將圖形載入到窗體的 Picture 屬性、PictureBox 控制項或 Image 控制項。
PrivateSubForm_Click()
DimMsgAsString'聲明變數。
OnErrorResumeNext'設置錯誤句柄。
Height=3990
Width=4890'設置高度和寬度。
Picture1.Picture=LoadPicture("C:.jpg",vbLPCustom,vbLPColor,32,32)
IfErrThen
Msg="Couldn'tfindthe.curfile."
MsgBoxMsg'顯示錯誤消息。
ExitSub'如果發生錯誤則退出。
EndIf
Msg="."
MsgBoxMsg
Picture1.Picture=LoadPicture()'清除picturebox。
EndSub