SOS急，很容易的来看看吧。

[smailsuper2]

帮我写一个时定关机的小程序，越简单越好！我想十分钟就搞定了吧。呵呵。谢谢啦，我要VB写的，把源码也给我一份好吗？？劳驾!!

[lou_df]

Private Sub Timer1_Timer()
if now()>=设定时间 then
ExitWindowsEx 1, 0
end if
end sub

[cdknet]

Public Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

[j_x_y]

hehe ~~~~
我来总结一下~！！！：）
Public Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Private Sub Timer1_Timer()
if now()>=设定时间 then
ExitWindowsEx 1, 0
end if
end sub

[westgirl]

我正好有个远程序，功能很全:[e-mail]