为什么SavePicture 会出错?
我做一个测试,用到SavePicture函数,怎么有时有用,有时却保存了一张空图片?比如下面这个就保存了一张空图片:
Private Sub Command1_Click()
Picture1.PaintPicture Image1, Image1.Left, Image1.Top, Image1.Width, Image1.Height, , , , , &HEE00C6
SavePicture Picture1.Image, App.Path & "\temp.Bmp"
End Sub
可上面的代码我几乎是从一个有用的程序中复制出来的,怎么到这就没用了呢?请高手解答。
谢谢了。
test.rar
(17.67 KB)