Question

vb中，如何在运行程序时，让picturebox1跟着鼠标在窗体中移动？

vb中，如何在运行程序时，让picturebox1跟着鼠标在窗体中移动？我写了一段代码：Private Sub Form_Load()
Picturebox1.Top = Mouse.Top
Picturebox1.Leftt = Mouse.Left
End Sub
这段代码却不行。请高手指点一下哪里错了，应该怎么改。最好写出源码。本人会最佳悬赏~~

Answer 1

错误：变量 Mouse 没有定义，还有应该把代码放在 MouseMove 过程中。代码正在写。

追问

谢谢你了~~很期待~~好的话会追加

追答

不用谢。不过代码现在还没写。

Answer 2

a=x b=y p1.left=a p1.top=b把代码放在mousemove过程里运行就OK！LZ啊用手机打的啊！…

追问

怎么写啊？
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
a = x b=y Piturebox1.left=a Picturebox1.top=b
End Sub
这样也不行啊！