电脑关机事件?VB.NET

use*_*090 5 vb.net shutdown

可能重复:
检测Windows关闭事件

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

Joh*_*bly 7

这里的例子

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
Run Code Online (Sandbox Code Playgroud)