当鼠标移到按钮上时，按钮如何移动到随机的位置上使鼠标不能点击到
编号：QA002287
建立日期: 1999年12月19日 最后修改日期：1999年12月19日
所属类别：
sunhao:
编程工具: vb
操作系统: windows
问题: 请问在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
此问题由李海回答。
| |
|
|
| |
|
|
