电脑关机事件？ VB.NET

Question

  

可能重复：
  Detecting windows shutdown event

在VB.NET中是否有关于关闭的事件？我想在用户点击关闭的计算机上执行语句，这可以在vb.net中完成吗？

Answer 1

来自here

的示例

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        AddHandler Microsoft.Win32.SystemEvents.SessionEnding, _
               AddressOf Handler_SessionEnding
    End Sub

    Public Sub Handler_SessionEnding(ByVal sender As Object, _
               ByVal e As Microsoft.Win32.SessionEndingEventArgs)
        If e.Reason = Microsoft.Win32.SessionEndReasons.Logoff Then
            MessageBox.Show("User is logging off")
        ElseIf e.Reason = Microsoft.Win32.SessionEndReasons.SystemShutdown Then
            MessageBox.Show("System is shutting down")
        End If
    End Sub
End Class