Como puedo con VB desabilitar la tecla tab o todo el teclado usando APIWin32

[Andresito]

hola !!!!
deseo saber como puedo a traves de un programa mio hecho en VB desabilitar todo el teclado o en su defecto la tecla TAB (tabulador) de manera tal de que nadie pueda usar el teclano ni para mi aplicacion ni para ninguna otra!!! es decir las teclas quedan inhabilitadas hasta que mi programita vuelva a habilitarlo nuvamente.

ojala alguien se apiade de este mensaje y tenga la amabilidad de reponderme cualquier cosa que pueda ayudarme. Gracias de antemano por toda la molestia tomada al responderme!!!!!!! .


gracias

[Jorge_Mota]

tomado de www.AllApi.net

Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Form_Activate()
'KPD-Team 2000
'URL: http://www.allapi.net/
'E-Mail: [email protected]
DoEvents
'block the mouse and keyboard input
BlockInput True
'wait 10 seconds before unblocking it
Sleep 10000
'unblock the mouse and keyboard input
BlockInput False
End Sub


Best Regards Amigo