以下是一段简单的vbs锁机代码:Set ="WScript.Shell")
以下是一段简单的vbs锁机代码:
Set WshShell = CreateObject("WScript.Shell")
'设置密码
strPassword="123456"
'显示提示信息
MsgBox "请输入密码,以解锁电脑!"
'循环输入密码,直到正确
Do
strInput=InputBox("请输入密码:")
If strInput<>strPassword Then
MsgBox "密码不正确,请重新输入!"
Else
MsgBox "密码正确,电脑已解锁!"
Exit Do
End If
Loop
本站系公益性非盈利分享网址,本文来自用户投稿,不代表边看边学立场,如若转载,请注明出处
评论列表(15条)