㈠ 怎么设置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