Question

vb picturebox中怎么把一个点画在画上

代码如下：
----------------------------------------------------------------
Private Sub Command1_Click()
Cls
Picture1.Picture = LoadPicture(Text1.Text)
End Sub

Private Sub Command2_Click()
Picture1.Line (0, 0)-(100, 100), vbGreen
MsgBox Picture1.Point(0, 0)
End Sub

Private Sub Command3_Click()
SavePicture Picture1, Text2.Text
End Sub
----------------------------------------------------------------
我按了按钮1载入了一张图后，有按了按钮2，线也出现了（不过过了一伙可能会消失-_-，不知道为什么），我又按了按钮3，图也保存了，但是在保存的图中却没有所画的线，为什么？
怎么改可以让这条线也跟着画一起保存？

高人详解！

Answer 1

把Picture1的AutoRedraw属性改为True，这样线就不会消失了

把Command3_Click()里的代码改为：
SavePicture Picture1.Image, Text2.Text
这样就行了...