vb代码是否正确

来源：百度知道 编辑：UC知道 时间：2024/06/22 00:10:02
Private Sub Picture1_DblClick()
“E:\相片\PICTURE\untitledv 拷贝.bmp”="E:\相片\PICTURE\无标题.bmp"

End Sub
谢谢各位，坑定错了，怎么改呀，我是一个无基础的文科生呀，还是中文系的，这个怎么弄都不行呀
练习9： 新建立窗体，大小10000*10000,为设置窗体加载时背景图片为“C:\WINNT\Web\Wallpaper\Windows 2000.jpg”，单击窗体时图片为“金色花瓣.jpg”，双击时图片为“天堂.jpg” ,就是这个问题，只不过我把磁盘的图片换了

Private Sub Form_Load()
form1.picture=loadpicture("C:\WINNT\Web\Wallpaper\Windows 2000.jpg")
End Sub

Private Sub Form_Click()
form1.picture=loadpicture("C:\WINNT\Web\Wallpaper\金色花瓣.jpg")
End Sub

Private Sub Form_DbClick()
form1.picture=loadpicture("C:\WINNT\Web\Wallpaper\天堂.jpg")
End Sub

出现错误的原因是赋值语句不能pp够给一个常量赋值。你的代码具体想实现什么功能我也看不出来，如果您是打算将BMP图像绘制到屏幕上（即Picture1中），可以使用下面的方法：

Private Sub Picture1_DblClick()
Picture1.picture = LoadPicture("E:\相片\PICTURE\无标题.bmp")
End Sub

具体的使用请查看MSDN

Option Explicit
'窗体大小你自己设置
Private Sub Form_Click()
Form1.Picture = LoadPicture("图片路径1")'单击加载图片1
End Sub

Private Sub Form_DblClick()
Form1.Picture = LoadPicture("图片路径2")'双击加载图片2
End Sub

兄弟,你文科生要转行咋地??