取消窗体.vb

来自「用C#编写的一个自动关机程序」· VB 代码 · 共 13 行

Public Class 取消窗体
    '取消关机
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        设置窗体.Timer2.Stop()
        Shell("shutdown -a")
        设置窗体.Timer1.Start()
        Me.Close()
    End Sub

    Private Sub 取消窗体_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class