VB关机问题

来源：百度知道 编辑：UC知道 时间：2024/05/18 10:56:44
用shell "shutdown -s -t 10 "可以关机，但是如何在那个关机的小窗口的下面方框里显示一些信息？

好的代码来了,直接复制到VB,运行下看结果就好了!!!

Private Declare Function exitwindows Lib "User" (ByVal dwReturnCode As Long, ByVal wReserved As Integer) As Integer
Dim myval As Integer

Private Sub Command1_Click()
'重新启动计算机
myval = exitwindows(&H43, 0)
End Sub

Private Sub Command2_Click()
'关闭计算机
myval = exitwindows(&H42, 0)
End Sub

我也是VB爱好者,以后相互切磋呗! ^_^