Situar el cursor sobre un control determinado
Para situar el cursor encima de un control determinado, por ejemplo un Botón, situar el siguiente codigo en un Modulo:
Declare sub SetCursorPos Lib “User32″ (ByVal X as Integer, ByVal Y as Integer)
Insertar en siguiente código en el evento Load de el Form:
Private Sub Form1_Load()
X % = (Form1.Left + Command1.Left + Command1.Width / 2 + 60 ) / Screen.Twips
Y% = (Form1.Top + Command1.Top + Command1.Height / 2 + 360) / Screen.Twips
SetCursorPos X%, Y%
End Sub
Nota: Para que sea mas fácil la escritura del codigo a colocar en el modulo, Visual Basic trae el Visor de API de Windows
Fuente: www.canalvisualbasic.net
Categorías:Microsoft Access
control, cursor, maccess, situar