---------------------------
΢Զػv1.0
---------------------------
ü򵥹ػĿǰСɫѶʱԶػ!


ΪⲿɱҼɱʰԴ빫òɱɱ÷ģõðġ

¾Դ룬VB6.0½е
Private Sub Command1_Click()
On Error Resume Next
Call Shell("shutdown -s -t " & Int(Text1.Text) * 60)
End Sub

Private Sub Command2_Click()
MsgBox "ü򵥹ػĿǰСɫѶʱԶػ!"
End Sub



