当鼠标移到按钮上时，按钮如何移动到随机的位置上使鼠标不能点击到.txt

以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.

Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) 
     Dim nX, nY 
     nX = Rnd * ScaleWidth 
     nY = Rnd * ScaleHeight 
     Command1.Move nX, nY 
    End Sub 
<END>