Inicio > Microsoft Access > Situar el cursor sobre un control determinado

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 Etiquetas:, , ,
  1. Aún no hay comentarios.
  1. Aún no hay trackbacks