vb问题啊~

来源：百度知道 编辑：UC知道 时间：2024/05/12 11:33:14
在一个窗口中 当鼠标移动到这个图片上 这个图片就会移动到一个指定位置， 然后再把鼠标移动到图片上边 图片又会到另一个位置，，，，，

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Randomize
A = Form1.Height * Rnd
B = Form1.Width * Rnd
Picture1.Top = A - Picture1.Height / 2
Picture1.Left = B - Picture1.Width / 2
End Sub
呵呵,这样你就永远点不到图片框了哦