如何把windows的一些热健屏蔽掉。

[sillyer]

我做了一个程序，想把如:Alt+F4这样的热健屏蔽掉，该怎么做？

[Greenberet]

在 Form_QueryUnload 或 Unload 事件中加入退出标志的判断即可（看你原贴子）

[Greenberet]

'首先定义一个全局布尔变量“CanExit”, 然后加入以下过程：
'首先设置一个全局布尔值“CanExit”来标识是否允许退出~
Dim CanExit As Boolean

Private Sub Form_Load()
CanExit = False '设置不能退出标志(对ALT+F4起作用，当要退出时 CanExit 必须为真)
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If Not CanExit Then Cancel = True '只有当 CanExit = True 时，才能退出(关闭)
End Sub

'这样 Alt+F4 这不能使用了，如果要屏蔽 ALT+TAB / CTRL+ALT+DEL / CTRL+ESC 可以
'调用 API 做到，这方面的例子好多~