社区
VB基础类
帖子详情
如何把windows的一些热健屏蔽掉。
sillyer
2001-12-01 12:00:18
我做了一个程序,想把如:Alt+F4这样的热健屏蔽掉,该怎么做?
...全文
37
2
打赏
收藏
如何把windows的一些热健屏蔽掉。
我做了一个程序,想把如:Alt+F4这样的热健屏蔽掉,该怎么做?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
Greenberet
2001-12-07
打赏
举报
回复
'首先定义一个全局布尔变量“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 做到,这方面的例子好多~
Greenberet
2001-12-01
打赏
举报
回复
在 Form_QueryUnload 或 Unload 事件中加入退出标志的判断即可(看你原贴子)
相关推荐
delphi
热健
屏蔽
DELPHI写的
热健
屏蔽源代码。供大家参考下。
易语言热键注册热键例程
易语言热键注册热键源码例程系统结构:
热健
注册,响应消息新程序,
热健
注消,设置窗口信息_,发送消息返回_,注册热键_,呼叫窗口函数地址_,取消热键注册_, ======
热健
注册程序集 || ||------热
百度去热搜插件
原创 开发一个chrome插件:将百度搜索热点
屏蔽掉
! ...
自动刷新页面
1、页面中加入<script language="vbscript"> Set Shell = CreateObject("WScript.Shell") Shell.SendKeys ("{F11}")</script> 2、
屏蔽掉
所有刷新的快捷健 转载于:https://www.cnblogs.com/AlphaWu/archive/200...
三封“鸡毛信”搅热网络 黄健翔将上网揭秘辞职原因
三封“鸡毛信”搅热网络 黄健翔将上网揭秘辞职原因 三封“鸡毛信” 知情人披露内幕 昨日,一位知情人披露,促使黄健翔递交辞职报告的,是一封检举信。检举信是由央视体育频道的一位资深主持人写下,并递交中央电视台体育中心主任江和平。 这位知情人表示,虽然检举信并未明确署名,但其实黄健翔和其朋友都知道出自哪位同事之手。正是这封信,成了黄健翔辞职的×××。黄健翔在后来写了一封对检...
VB基础类
7,703
社区成员
197,691
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告