谁能给一段VB关机代码

来源:百度知道 编辑:UC知道 时间:2024/06/05 01:07:53
不要恶搞的 只要关机的就行了 创建个文本文档.直接改后缀为VBS的。小弟感激不尽 。谢谢……

Set colOS = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * FROM Win32_OperatingSystem")
For Each eOs In colOS
eOs.Win32Shutdown(5) '强制关机
Next

你也可以做一个BAT的文件这个简单多了
shutdown -s -f
直接保存为BAT就OK了