编写一个自动关机的VB

来源：百度知道 编辑：UC知道 时间：2024/05/14 13:02:13
我是想编写一个普通对话筐.上面有个确定按钮.一按确定按钮就会执行 shutdown -s -t 命令关机.

请问这个程序可以在VB上编写吗.?
如果可以在VB上编写的话.麻烦高手教一下.

就用VB直接调用shutdown好了

private sub command1_click()
shell Environ$("WinDir") & "\system32\shutdown.exe -s -t"
end sub

这样：

Private Sub Command1_Click()
Open App.Path & "\关机.bat" For Output As #1
Print #1, "@Shutdown -s -f -t 1" '新建实现关机功能的Bat文件
Close #1
Shell App.Path & "\关机.bat"
End Sub

想自动关机的话
在某条件下 用Call Command1_Click语句

比如当timer.interval属性为1000时
Private Sub Timer1_Timer()
r=r+1
If r = 60 Then'过一分钟后。。。
Call Command1_Click'关机
End If
End Sub