我自己用VB制作了一个屏幕保护程序,我想让这个屏幕保护程序在推出时要输入密码,大家帮帮我?

来源:百度知道 编辑:UC知道 时间:2024/06/07 21:09:00
不要鼠标和键盘事件
现在如果按下ctrl+alt+del能结束屏保程序,在帮我弄一下,我多给你十分,谢谢你啊~!~!~

窗体的卸载事件里写代码不就OK了?~~~

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Dim pass As String
pass = InputBox("请输入退出密码", "密码")
If pass = "正确密码" Then
Unload Me
Else
Cancel = True
MsgBox "密码错误,不能退出"
End If
End Sub

补充:
我这里有隐藏进程的模块,把模块加进去 在任务管理器就看不到了,相应的也就没法终止进程了. 代码太长 发不出来...如果你需要的话 给我发个消息就行.