win98中vb如何屏蔽系统热键盘

热心网友

Win 9X下用调用SystemParametersInfo。 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 Private Const SPI_SCREENSAVERRUNNING = 97 Private Sub cmdEnable_Click() '使Ctrl+Alt+Del有效 SystemParametersInfo SPI_SCREENSAVERRUNNING, True, p, 0 End Sub Private Sub cmdDisable_Click() '使Ctrl+Alt+Del无效 SystemParametersInfo SPI_SCREENSAVERRUNNING, False, p, 0 End Sub 。

热心网友

Win 9X下用调用SystemParametersInfo,在Win2000下无效。 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 Private Const SPI_SCREENSAVERRUNNING = 97 Private Sub cmdEnable_Click() '使Ctrl+Alt+Del有效 SystemParametersInfo SPI_SCREENSAVERRUNNING, True, p, 0 End Sub Private Sub cmdDisable_Click() '使Ctrl+Alt+Del无效 SystemParametersInfo SPI_SCREENSAVERRUNNING, False, p, 0 End Sub 。