Ayuda para visual

Hola, querría saber si podéis ayudarme a deshabilitar las teclas control, alt, y suprimir y luego como habilitarlas. Gracias
1

1 Respuesta

345.450 pts. Programacion Avanzada en VisualBasic, trabajo hace mas...
Primero declara esto en el procedimiento general del formulario:
Private Const SPI_SCREENSAVERRUNNING = 97&
Private Declare Function SystemParametersInfo Lib "User32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Luego para deshabilitar las teclas que pides pones:
Dim lngRet As Long
Dim blnOld As Boolean
lngRet = SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, blnOld, 0&)
para habilitar pones:
Dim lngRet As Long
Dim blnOld As Boolean
lngRet = SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, blnOld, 0&)

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas