vb定时关机代码（vb强制关机代码）

本篇文章给大家谈谈vb定时关机代码，以及vb强制关机代码对应的知识点，希望对各位有所帮助，不要忘了收藏本站喔。

本文目录一览：

• 1、vb定时关机代码
• 2、VB自动关机代码是什么？
• 3、Vb中让电脑定时关机的代码
• 4、用VB如何编写一个程序使电脑定时关机
• 5、求每天定时关机的VB代码？

vb定时关机代码

很简单的，新建一个窗体，画一个timer控件，将interval设为1000，

假设你希望每天的晚上8点关电脑，则直接在代码区写上以下代码

const

t

as

string="20:00"

'修改关机时间请在这里修改，

private

sub

form_load()

me.visible=false

timer1.interval=1000

end

sub

private

sub

timer1_timer()

if

time(now)=t

then

shell

"shutdown

-s

-f

-t

1"

end

if

end

sub

以上为代码，哪里不懂请追问

VB自动关机代码是什么？

用VB实现控制电脑自动关机，自动重启，自动注销，自动待机等代码

设定状态

SetSuspendState

是否支持休眠

IsPwrHibernateAllowed

是否支持待机

IsPwrSuspendAllowed

看MSDN的Power Management部分

ColdMooon

'在窗体内

'放置一个时间控件，两个标签控件和一个文体框控件，和两个单选按钮，两个命令按钮

Option Explicit

 Dim txtTime '保存输入时间

 Dim nowTime '保存实时时间

 Dim oldTime '保存开始定时时间

 Private Sub Form_Load()

 me.caption="定时关机"

 me.label1.caption="关机时间："

 me.Option1.caption="在指定时间关机(时间格式：00:00:00)"

 me.Option2.caption="延迟指定的时间关机"

 me.command1.caption="确定"

 me.command2.caption="取消"

 Me.Text1 = GetSetting("ShutDownWindows", "Options", "ShutDownTime",

Vb中让电脑定时关机的代码

Dim t As Integer

Private Sub Form_Load()

    Timer1.Interval = 1000

    Timer1.Enabled = True

    me.show

    print "1分钟后自动关机"

End Sub

Private Sub Timer1_Timer()

    t = t + 1

     me.caption=t

    If t = 60 Then

        Shell "shutdown -s -t 0"

        End

    End If

End Sub

用VB如何编写一个程序使电脑定时关机

Public a

Public b

Private Sub Form_Click()

a = InputBox("输入你想关机的时间--时（0-23）")

b = InputBox("输入你想关机的时间--分（0-59）")

Me.Caption = "你要关机的时间是" a "时" b "分"

End Sub

Private Sub Form_Load()

Timer1.Interval = 1000

End Sub

Private Sub Timer1_Timer()

Me.Cls

Print "现在时间是：" Time

If Hour(Time) = a And Minute(Time) = b Then

Timer1.Enabled = False

Shell ("c:\windows\system32\shutdown.exe /s /t 0")

End If

End Sub

求每天定时关机的VB代码？

很简单的，新建一个窗体，画一个timer控件，将interval设为1000，

假设你希望每天的晚上8点关电脑，则直接在代码区写上以下代码

const

t

as

string="20:00"

'修改关机时间请在这里修改，

private

sub

form_load()

me.visible=false

timer1.interval=1000

end

sub

private

sub

timer1_timer()

if

time(now)=t

then

shell

"shutdown

-s

-f

-t

1"

end

if

end

sub

以上为代码，哪里不懂请追问

vb定时关机代码的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb强制关机代码、vb定时关机代码的信息别忘了在本站进行查找喔。