在名为Form1的窗体上绘制一个名为

来源：百度知道 编辑：UC知道 时间：2024/05/29 17:21:57
在名为Form1的窗体上绘制一个名为Pic1的图片框，其高为1500、宽为2000，并放入文件名为pic1.bmp的图片，如图1-300所示。请编写适当的事件过程，使得在运行时，若双击窗体，则图片框中的图片消失。

先添加一个 picturebox 然后在属性框里设置Top为1500 Width为2000
之后在代码框里如下即可：
Private Sub Form_DblClick()
End
End Sub

Private Sub Form_Load()
Picture1.Picture = LoadPicture("C:\Downloads\pic1.bmp")
End Sub

其中C:\Downloads\pic1.bmp为图片的存放的绝对路径

如果是相对路径存放的，可以使用 app.path ，它代表 当前 EXE 所在路径

比如你需要加载的图片就在当前 EXE 所在文件夹下，那么

Picture1.Picture = LoadPicture(App.Path & "\pic1.bmp")

如果你需要加载的图片就在当前 EXE 所在文件夹的下一级文件夹下，比如 Downloads，那么

Picture1.Picture = LoadPicture(App.Path & "\Downloads\pic1.bmp")