在窗体上建立一个图像框,在其中放置一幅图像,单击图像框使它向右移动.运行不成,提醒命令错误。

来源:百度知道 编辑:UC知道 时间:2024/06/17 13:27:27
命令如下:
Private Sub Form_Load()
Image1.Picture = LoadPicture(App.Path + "\happy.bmp")
End Sub

Private Sub Image1_Click()
Image1.Move Image1.Left + 100, Image1.Top + 100
End Sub

『Image1.Picture = LoadPicture(App.Path + "\happy.bmp")』这行是不是有问题?
应该怎么谢啊?

图片地址没写清楚

Image1对像你有实例化吗?这边我没看到
比如:
dim image1 as image

没有问题的,你的代码
不过你要生成exe然后将图片放在exe的同一个目录里,就行了