1,486
社区成员
发帖
与我相关
我的任务
分享请教各位高人：屏蔽键盘的WIN按键、屏蔽ctrl+alt+del按键(或者按了时，发生我们定义的事情)、屏蔽开始菜单？
请教各位高人：
如何屏蔽键盘的WIN按键、屏蔽ctrl+alt+del按键(或者按了时，发生我们定义的事情)、屏蔽开始菜单？
如何在打开任务管理器时，看到的是我们自己定义的任务管理器？
谢谢先！
如何屏蔽键盘的WIN按键、屏蔽ctrl+alt+del按键(或者按了时，发生我们定义的事情)、屏蔽开始菜单？
如何在打开任务管理器时，看到的是我们自己定义的任务管理器？
谢谢先！
...全文
请发表友善的回复…
发表回复
weiyulin 2005-12-16
- 打赏
- 举报
没人知道吗
weiyulin 2005-12-07
- 打赏
- 举报
一出来就关闭 Ctrl + Alt + Del 出来的Form 的 Hwnd 为0 啊
我不解。。。。。 指教
我不解。。。。。 指教
叶帆 2005-12-02
- 打赏
- 举报
这是我做的一个VB控件，不过其核心也是用VC做的
http://www.bjjr.com.cn/yefan/SourceCode/YFSysKey.rar
http://www.bjjr.com.cn/yefan/SourceCode/YFSysKey.rar
蒋晟 2005-12-02
- 打赏
- 举报
VB? not likely. Go to buy a C++ book, or ask some C++ programmer to write a DLL for you.
weiyulin 2005-12-01
- 打赏
- 举报
帮你顶 关注
imur2008 2005-09-23
- 打赏
- 举报
谢谢maomao123_1981(落下) 大侠！
但是我只会VB，有没有VB的？继续请教！
但是我只会VB，有没有VB的？继续请教！
dingmin 2005-09-20
- 打赏
- 举报
晕 我知道 原来给同事恶搞了一个
但我不会告诉你，你这明显的是要干坏事了
但我不会告诉你，你这明显的是要干坏事了
「已注销」 2005-09-20
- 打赏
- 举报
http://www.vckbase.com/document/viewdoc/?id=424
vansoft 2005-09-19
- 打赏
- 举报
用鍵盤鉤子。可以做到。
imur2008 2005-09-18
- 打赏
- 举报
我相信API天下无敌！不可能做不到！
但是问题是：怎么做到？
继续请教！
但是问题是：怎么做到？
继续请教！
kmlxk0 2005-09-12
- 打赏
- 举报
修改注册表
「已注销」 2005-09-12
- 打赏
- 举报
可以从控制键盘入手
WIN按键可以屏蔽
ctrl+alt+del按键这个是操作系统保留的不改系统是不能屏蔽的
可以后台驻留一个程序 只要出来就马上关掉然后自己再开一个类似程序
WIN按键可以屏蔽
ctrl+alt+del按键这个是操作系统保留的不改系统是不能屏蔽的
可以后台驻留一个程序 只要出来就马上关掉然后自己再开一个类似程序
imur05 2005-09-11
- 打赏
- 举报
做坏事？真是奇怪了
ctrl+alt+del这组快捷键 想屏蔽 是不可能的==========不是说API是最低层的开发吗？应该还是有办法的，只是我不懂而已
继续请教：如何才能屏蔽ctrl+alt+del？
ctrl+alt+del这组快捷键 想屏蔽 是不可能的==========不是说API是最低层的开发吗？应该还是有办法的，只是我不懂而已
继续请教：如何才能屏蔽ctrl+alt+del？
potato015 2005-09-09
- 打赏
- 举报
ctrl+alt+del这组快捷键 想屏蔽 是不可能的
楼主不是想做坏事吧
楼主不是想做坏事吧
boyzhang 2005-09-06
- 打赏
- 举报
GZ
imur05 2005-09-06
- 打赏
- 举报
晕！
这个ALT+F4的代码在VB6+Win2000下不能通过，不知那位大侠帮调试一下？
谢谢先！
这个ALT+F4的代码在VB6+Win2000下不能通过，不知那位大侠帮调试一下？
谢谢先！
hz932 2005-09-05
- 打赏
- 举报
upp!
imur05 2005-09-04
- 打赏
- 举报
继续请教！
imur05 2005-09-03
- 打赏
- 举报
谢谢高人指点！！！！
但是我还是有点不明：要是屏蔽键盘的WIN按键、屏蔽ctrl+alt+del按键(或者按了时，发生我们定义的事情)、屏蔽开始菜单这三个功能，分别要怎么修改代码 才行？
里面有部分我看不懂，最好结合一下我的问题指点一下，谢谢先！
但是我还是有点不明：要是屏蔽键盘的WIN按键、屏蔽ctrl+alt+del按键(或者按了时，发生我们定义的事情)、屏蔽开始菜单这三个功能，分别要怎么修改代码 才行？
里面有部分我看不懂，最好结合一下我的问题指点一下，谢谢先！
fanmy_001 2005-09-02
- 打赏
- 举报
使用键盘钩子函数：
本例中的钩子用来监视并记录应用程序中的按键信息。在程序中，ALT+F4组合键被屏蔽。下面是部分代码：
Public hHook as Long
Private Sub Form_Load()′程序启动时安装钩子
hHook=SetWindowsHookEx(2，Address of MyKBHook，0，App.ThreadID)
End Sub
′具体的钩子程序，本例中该过程被包含在Module1中
Public Function MyKBHook(ByVal nCode As Long，ByVal wParam As Long，ByVal lParam As Long)As Long
If nCode>=0 then
Open "C:\Keyfile.txt" For Append As #1 '将键盘的操作记录在Keyfile.txt文件之中
'记录所操作的键、操作时间、日期操作时的按键状态，用16进制记录
Write #1，wParam，Hex(lParam)，Date，time
Close #1
MyKBHook=0 '表示要处理这个消息
'屏蔽ＡＬＴ+Ｆ4组合键
if wParam=115 And(lParam And&H20000000)<>0 Then
if(lParam And &HC000000)=0 Then '是否进行ALT+F4操作
MyHBHook=1 '钩子吃掉这个消息
End if
End if
End if
Call CallNextHookEx(hHook，nCode，wParam，lParam)'将消息传给下一个钩子
End Function
'程序退出时卸载钩子
Private Sub Form_Unload(Cancel As Interger)
Call Unhook WindowsHookEx(hHook)
End Sub
本例中的钩子用来监视并记录应用程序中的按键信息。在程序中，ALT+F4组合键被屏蔽。下面是部分代码：
Public hHook as Long
Private Sub Form_Load()′程序启动时安装钩子
hHook=SetWindowsHookEx(2，Address of MyKBHook，0，App.ThreadID)
End Sub
′具体的钩子程序，本例中该过程被包含在Module1中
Public Function MyKBHook(ByVal nCode As Long，ByVal wParam As Long，ByVal lParam As Long)As Long
If nCode>=0 then
Open "C:\Keyfile.txt" For Append As #1 '将键盘的操作记录在Keyfile.txt文件之中
'记录所操作的键、操作时间、日期操作时的按键状态，用16进制记录
Write #1，wParam，Hex(lParam)，Date，time
Close #1
MyKBHook=0 '表示要处理这个消息
'屏蔽ＡＬＴ+Ｆ4组合键
if wParam=115 And(lParam And&H20000000)<>0 Then
if(lParam And &HC000000)=0 Then '是否进行ALT+F4操作
MyHBHook=1 '钩子吃掉这个消息
End if
End if
End if
Call CallNextHookEx(hHook，nCode，wParam，lParam)'将消息传给下一个钩子
End Function
'程序退出时卸载钩子
Private Sub Form_Unload(Cancel As Interger)
Call Unhook WindowsHookEx(hHook)
End Sub
加载更多回复（3）
