VB中关于屏蔽del+ctrl+ctrl键的问题 请问在VB中该调用什么api函数来屏蔽del+ctrl+ctrl键,该怎么调用,十万火急,请指点。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByRef lpvParam As Any, ByVal fuWinIni As Long) As Long 我在窗体load的时候调用了,但是不起作用,那参数我是用的(97,true,ctr(1),0)不知道有没有错误,请指点 2000 以上系统参考:http://search.csdn.net/Expert/topic/2374/2374876.xml?temp=.8965723 顶啊,,我也是第一次在网上看到这样的代码 解决了N久都没有解决 试了。 环境为:Windows XP 专业版 VB6.0 运行不通过 代码有问题吗 详细:http://blog.csdn.net/yefanqiu/archive/2004/10/21/145922.aspx 屏蔽Windows98/2000/XP任务栏、win键、Ctrl+Esc、Alt+Tab、Ctrl+Alt+Del 关于这方面的文章挺多,对任务栏、win键、Ctrl+Esc、Alt+Tab的屏蔽,一般方法较为简单,最多用底层键盘钩子+DLL就能完美解决。但是针对Ctrl+Alt+Del的屏蔽,方法基本有两种,一种是采用Gina Dll技术,替换Window自带的MSGINA.DLL,这个技术不仅不易调试(很容易系统就无法进入了),并且效果很不好,按Ctrl+Alt+Del三键虽然不会出现任务管理器,但屏幕闪烁;另一种是采用DLL注入技术,在消息循环中真正屏蔽Ctrl+Alt+Del键,效果很好,不会出现第一种方法中的闪屏现象。本程序就是采用了第二种方法有效的屏蔽了Ctrl+Alt+Del。除此之外,在屏蔽任务栏时还有一个技术难点,就是当用户设置任务栏为自动隐藏时,不能很好的屏蔽任务栏(在Win2000鼠标滑到底部,任务栏还会出现),在XP下通过API函数SHAppBarMessage很有效的解决了该问题,不过同样的代码在Win2000中不起作用,MSDN有一段话说,在Win2000下无法用程序设定该设置,只能手动设置(天知道微软为何屏蔽该功能?),所以我也没有办法,用API函数keybd_event勉强解决了该问题(如果解决不好,它会提示你关闭任务栏自动隐藏功能)。此外,最大的一个改变是,我把所有的功能集成到一个只有29K的控件里,只需两个方法就可以完美搞定。下面是示例源码:'************************************************************'**模 块 名:frmDemo'**说 明:YFsoft 版权所有2004 - 2005(C)'**创 建 人:叶帆'**日 期:2004-10-21 15:47:15'**修 改 人:'**日 期:'**描 述:屏蔽系统键 Win98/Win2000/WinXP'**版 本:V1.0.0'************************************************************Option Explicit'************************************************************'**函 数 名:Command1_Click'**输 入:Index(Integer) - 0,1'**输 出:无'**功能描述:屏蔽系统键'**全局变量:'**调用模块:'**作 者:叶帆'**日 期:2004-10-21 15:47:12'**修 改 人:'**日 期:'**版 本:V1.0.0'************************************************************Private Sub Command1_Click(Index As Integer) If Index = 0 Then YFSysKey1.HideSysKey '屏蔽 Else YFSysKey1.ShowSysKey '显示 End IfEnd Sub-------------------------------下载地址:http://www.bjjr.com.cn/yefan/SourceCode/YFSysKey.rar 进程插入技术我也想学习!问题是VB生成的DLL好象没办法做这样的应用啊.现在看来也只有用VC来做了另,现在有一种PowerBasic不知道能不能生成标准DLL呢? 这段VBS代码有什么问题? 求教一个VB的问题,如何编写 等待一个窗体返回值再执行 listbox与dadagrid组合使用问题! VB listview 不显示内容 急!!! 车牌识别系统 PictureBox显示BMP文件时有没有大小的限定。 急: 关于实时错误"94" 无效使用"null"的问题 vb中如何显示数据库的数据? 菜鸟问题-有关打包生成exe 文件的问题`~ 可憐的求助,VB中調用API函數缺乏許多常數的數值,請問在哪裡可以查到 解方程 VB如何发出dou,re,me……等的音乐?
http://search.csdn.net/Expert/topic/2374/2374876.xml?temp=.8965723
试了。 环境为:Windows XP 专业版 VB6.0 运行不通过 代码有问题吗
'**模 块 名:frmDemo
'**说 明:YFsoft 版权所有2004 - 2005(C)
'**创 建 人:叶帆
'**日 期:2004-10-21 15:47:15
'**修 改 人:
'**日 期:
'**描 述:屏蔽系统键 Win98/Win2000/WinXP
'**版 本:V1.0.0
'************************************************************
Option Explicit'************************************************************
'**函 数 名:Command1_Click
'**输 入:Index(Integer) - 0,1
'**输 出:无
'**功能描述:屏蔽系统键
'**全局变量:
'**调用模块:
'**作 者:叶帆
'**日 期:2004-10-21 15:47:12
'**修 改 人:
'**日 期:
'**版 本:V1.0.0
'************************************************************
Private Sub Command1_Click(Index As Integer)
If Index = 0 Then
YFSysKey1.HideSysKey '屏蔽
Else
YFSysKey1.ShowSysKey '显示
End If
End Sub-------------------------------下载地址:http://www.bjjr.com.cn/yefan/SourceCode/YFSysKey.rar