Win7下怎么禁用Alt+Esc的组合键及功能?

很讨厌这个组合键 每次都按错怎么把它禁用了?

End If
End Function
'add a checkbox named chkDisable.caption="&Disable ALT-TAB, ALT-ESC, CTRL-ESC,LWin,RWin,Win+Any"
'to a new from named frmMain.frm in new project hook_kb_LL.vbp
'add code below:
Option Explicit
Dim hhkLowLevelKybd As Long
Private Sub chkDisable_Click()
If chkDisable = vbChecked Then
hhkLowLevelKybd = SetWindowsHookEx(WH_KEYBOARD_LL, AddressOf LowLevelKeyboardProc, App.hInstance, 0)
Else
UnhookWindowsHookEx hhkLowLevelKybd
hhkLowLevelKybd = 0
End If
End Sub
Private Sub Form_Unload(Cancel As Integer)
If hhkLowLevelKybd <> 0 Then UnhookWindowsHookEx hhkLowLevelKybd
End Sub
这些代码复制到记事本中,然后更改拓展名为cmd,放在桌面运行即可,不行的话欢迎追问
温馨提示:答案为网友推荐,仅供参考
相似回答