VB鼠标位置

Private Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long’先声明

Private Sub Command1_Click()
Call SetCursorPos(600, 100)’将鼠标放到坐标为(600, 100)的地方
End Sub
_____________________________________________________________________________ _

中磊UG二次开发教程 梅雷著 qq1821117007
学UG就上UG网 http://www.9sug.com/