Hola, amigos del foro!
Sólo quisiera saber qué codigo vba en access necesito para activar y/o
desactivar la tecla "NUMLOCK" en tiempo de ejcución.
SOFTJAEN (ENRIQUE MARTINEZ)
===========================
Tienes que recurrir a la API de Windows. Te dejo el siguiente código que
activará/desactivará la tecla del bloque numérico cada vez que llames al
procedimiento «SendNumLock»:
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, _
ByVal bScan As Byte, ByVal dwFlags As Long, _
ByVal dwExtraInfo As Long)
Public Sub SendNumLock()
'
' El procedimiento activará/desactivará la tecla
' del bloque numérico
'
Const KEYEVENTF_EXTENDEDKEY = &H1
Const KEYEVENTF_KEYUP = &H2
Const VK_NUMLOCK = &H90
keybd_event VK_NUMLOCK, vbKeyNumlock, KEYEVENTF_EXTENDEDKEY _
Or 0, 0
keybd_event VK_NUMLOCK, vbKeyNumlock, KEYEVENTF_EXTENDEDKEY _
Or KEYEVENTF_KEYUP, 0
End Sub
Un saludo.
               (
geocities.com/es/ensolva/Descargas)                   (
geocities.com/es/ensolva)                   (
geocities.com/es)