如何用picturebox动态作图

Question

我正在做一个小东西，遇到了一点困难，请各位大侠指教。

Answer 1

dim fpath as string   '文件路徑字符串
fpath="d:\test\10021.jpg"
picture1.image=loadpicture(fpath)但是你要確保文件d:\test\10021.jpg存在

Answer 2

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.DrawMode = 13
Picture1.PSet (X, Y)
End SubPrivate Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.DrawMode = 13
If Button = 1 Then Picture1.Line -(X, Y)
End Sub

Answer 3

由于不小心按了Enter，导致问题没有写清，很抱歉。多谢各位大侠的指教