Establece la posición del cursor. Las coordenadas son absolutas y se miden en pixels.
Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Sub Posicionar_Cursor(X As Long, Y As Long)
Dim Res As Long
Res = SetCursorPos(X, Y)
End SubRes es distinto de cero si funciona correctamente y 0 en caso de error.
Posted
mié, nov 24 1999 23:16
by
Maverick