当前位置:首页 >> 建筑/土木 >>

禁止使用 Alt-Tab 或 Ctrl-Alt-Del


禁止使用 Alt-Tab 或 Ctrl-Alt-Del

Private Declare Function EnableWindow Lib "user32" (ByVal hWnd As Integer, ByVal aBOOL As Integer) As Integer
Private Declar

e Function IsWindowEnabled Lib "user32" (ByVal hWnd As Integer) As Integer
Private Declare Function GetMenu Lib "user32" (ByVal hWnd As Integer) As Integer
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long

Private TaskBarhWnd As Long
Private IsTaskBarEnabled As Integer
Private TaskBarMenuHwnd As Integer
'禁止或允许使用 Alt-Tab
Sub FastTaskSwitching(bEnabled As Boolean)
Dim X As Long, bDisabled As Long
bDisabled = Not bEnabled
X = SystemParametersInfo(97, bDisabled, CStr(1), 0)
End Sub
'禁止使用Ctrl-Alt-Del
Public Sub DisableTaskBar()
Dim EWindow As Integer
TaskBarhWnd = FindWindow("Shell_traywnd", "")
If TaskBarhWnd <> 0 Then
EWindow = IsWindowEnabled(TaskBarhWnd)
If EWindow = 1 Then
IsTaskBarEnabled = EnableWindow(TaskBarhWnd, 0)
End If
End If
End Sub
'允许使用Ctrl-Alt-Del
Public Sub EnableTaskBar()
If IsTaskBarEnabled = 0 Then
IsTaskBarEnabled = EnableWindow(TaskBarhWnd, 1)
End If
End Sub

禁止 Ctrl+Alt+Del
声明(For Win95):
Const SPI_SCREENSAVERRUNNING = 97
Private Declare Function SystemParametersInfo Lib "user32" Alias _
"SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, _
lpvParam As Any, ByVal fuWinIni As Long) As Long
使用:
'禁止
Dim pOld As Boolean
Call SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, pOld, 0)
'开启
Dim pOld As Boolean
Call SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, pOld, 0)

相关文章:
Windows XP系统中如何屏蔽 Ctrl+Alt+Del、Alt+Tab以及C...
Windows XP系统中如何屏蔽 Ctrl+Alt+DelAlt+Tab以及Ctrl+Esc键序列_电脑基础...控制面板中“用户帐号”管理的“选择登录注销选项”设置启用了“使用欢迎 屏幕...
关于Ctrl+Alt+Del
关于Ctrl+Alt+Del_电脑基础知识_IT/计算机_专业资料。说到 Ctrl+Alt+Del 可能...11页 免费 禁止使用 Alt-Tab Ct... 2页 免费喜欢此文档的还喜欢 ...
Windows XP系统中如何屏蔽 Ctrl+Alt+Del、Alt+Tab以及C...
因此本文侧重于介绍在 Windows XP 中如何实现屏蔽 CTRL+ALT+DEL 组合键,也就是任务管理器,任务切换组合键 (Alt+Tab) ,任务栏和“开始”菜单(Ctrl+Esc,VK_...
Ctrl+Alt+delete的使用
执行“本地计算机策略→用户配置→管理模板→系统 →Ctrl+Alt+Del 选项”命令。...或者 通过修改注册表,可以禁止用户使用“任务管理器”。新建一个双字节(REG_ ...
电脑开机显示Ctrl+Alt+Del的解决办法
电脑开机显示Ctrl+Alt+Del的解决办法_电脑基础知识_IT/计算机_专业资料。电脑...使用 U 盘光盘启动到 PE 系统后使用 DM 处理过程: 右键点击硬盘 0(只有一...
Linux系统安全
10. 使 CTRL-ALT-DEL 关机键无效 编辑/etc/inittab 文件注释 ca::ctrlclt...禁止使用控制台程序 删除/etc/security/console.apps 目录下的: halt power ...
Ctrl+Alt+Del组合键
使用 Windows XP 系统中,按下 Ctrl+Alt+Del 组合键,弹出“任务管理器”,它提供了正 在运行的程序进程的相关信息, 可以监视计算机性能、 查看网络状态等, ...
2013linux考试答案
将/etc 目录(包括其子目录和所有文件)打包并压缩到 /root/exam/etc.tar.gz ...禁止用户使用 ctrl-alt-del 组合键重启系统 ; vi /etc/inittab 一行注释掉 ...
WIN7使用组合键CTRL+ALT+DEL无法调出任务管理器
WIN7使用组合键CTRL+ALT+DEL无法调出任务管理器_计划/解决方案_实用文档。WIN7...禁止使用 Alt-Tab Ct... 1页 免费 win7快捷键-ctrl和alt 2页 免费 ...
按下Ctrl+alt+del三键为什么出现windows安全,而不是任...
禁用 ”选项, 单击”确定”以后,按”Ctrl+Alt+Del”组合 键就可以调出”任务...新建一个名称为“ DisableTaskMgr”的键值,值为 0 不存在时表 示允许使用[...
更多相关标签:
ctrl alt del | ctrl alt del无限重启 | 开机显示ctrl alt del | 电脑开机ctrl alt del | 禁用ctrl alt del | 虚拟机ctrl alt del | ctrl alt del没反应 | 开机出现ctrl alt del |