说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

贴了二次为什么没有人指教?

编辑:说三道四文库 发布时间:2018-06-20 06:09
HTML文档下载 WORD文档下载 PDF文档下载
VB编程中如何屏蔽掉ALT+F4、CTRL+ALT+DEL、及Win键?
你太懒了。。。这些文章满大街都是,自己也不搜!

2.VB5中如何屏蔽掉win95中的CTRL_ALT_DEL, CTRL_ESC, ALT_TAB三组热键通过调用API函数"SystemParametersInfo"来实 现。
首先创建一新工程;在此工程中添加一个窗体和 一个模块;在窗体上拖放两个按钮分别命名为 "cmdDisable","cmdEnable";Copy如下代码入模块中:
Public Declare Function SystemParametersInfo Lib "user32" Ahias "SystemParametersInfoA" (ByVal uAction As Long,ByVal uParam As Long, lpvParam As Any,ByVal fuWinIni As Long)AS Long
Public Const SPI_SCREENSAVERRUNNING=97
在窗体的代码编辑区Copy如下代码:
'使三组热键失效
Private Sub cmdDisable_click()
SystemParametersInfo
SPI_SCREENSAVERRUNNING,True,byVal 1&,0
End Sub

Private Sub Form_Unload(Cancel As Integer)
'程序退出前是热键有效
CndEnable_Click
End Sub
若将此功能和屏幕保护程序结合到一起,那您的屏幕 保护程序一定增色许多。
API函数的简单调用例子就是这么容易,相信现在您 对API的调用已不再感到神秘了,接下来我们就看看一个 比较复杂的应用。
楼上是98中的应用,win2000以上版本不行

楼主你的系统是什么?

http://expert.csdn.net/Expert/topic/785/785575.xml?temp=.3371088
楼上是98中的应用,win2000以上版本不行

楼主你的系统是什么?

http://expert.csdn.net/Expert/topic/785/785575.xml?temp=.3371088
wxy_xiaoyu(☆然也☆╭∩╮(︶︿︶)╭∩╮) :

噢,没注意那个系统,随手沾了一个 西西
此种问题连我都回答了n次了。
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘