设为首页收藏本站

偏爱技术社区-偏爱技术吧-源码-科学刀-我爱辅助-娱乐网-游戏源码» › 软件专区 › 电脑技术 › vbs关机小代码

发新帖

查看: 1047|回复: 0

[日常技巧] vbs关机小代码

累计签到：241 天
连续签到：1 天

99 主题	80 回帖	4008 积分

单身狗的😉

名望: 229 点
星币: 694 枚
星辰: 18 颗
好评: 119 点

发表于 2022-8-8 13:50:39 | 显示全部楼层 |阅读模式

注册登录后全站资源免费查看下载

您需要登录才可以下载或查看，没有账号？立即注册

×

Option Explicit
On Error Resume Next
Dim answer
Dim WshShell
set WshShell = CreateObject("wscript.Shell")
WshShell.Run "Shutdown /f /s /t 10 /c 输入'我是傻逼'，否则10秒后关机~",0
Do While answer<>"我是傻逼"
answer=InputBox("输入'我是傻逼'，否则10秒后关机~","哈哈哈",,7000,8000)
Loop
WshShell.Run "Shutdown /a",0
MsgBox "哈哈哈，傻逼",,"哈哈哈"

复制代码

你们的好评是我们最大的支持，更是我们更新的动力~

回复

使用道具举报

发新帖

免责申明：偏爱技术所发布的一切软件、源码、破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的；不得将上述内容用于商业或者非法用途，否则，一切后果请用户自负。本站信息来自网络，版权争议与本站无关。您必须在下载后的24个小时之内，从您的电脑中彻底删除上述内容。如果您喜欢该程序，请支持正版软件，购买注册，得到更好的正版服务。如有侵权请邮件与我们联系处理。

Mail To:service@pai.al

Archiver|手机版|偏爱技术社区-偏爱技术吧-源码-科学刀-我爱辅助-娱乐网--教开服-游戏源码

偏爱技术社区-偏爱技术吧-源码-科学刀-我爱辅助-娱乐网-游戏源码

Powered by Discuz! X3.5

GMT+8, 2024-11-21 21:35 , Processed in 0.080712 second(s), 34 queries .

快速回复 返回顶部 返回列表