VB.NET中实现关机/休眠/重启/注销的类
作者:YuNa 文章来源:web 点击数: 更新时间:2007-8-2
nbsp; End If
FreeLibrary(libPtr)
End If
Return False
End Function
Protected Function FormatError(ByVal number As Integer) As String
Dim Buffer = New StringBuilder(255)
FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, IntPtr.Zero, number, 0, Buffer, Buffer.Capacity, 0)
Return Buffer.ToString()
End Function
End Class
Public Class PrivilegeException
Inherits Exception
Public Sub New()
MyBase.New()
End Sub
Public Sub New(ByVal message As String)
MyBase.New(message)
End Sub
End Class
例如实现注销功能:
Dim shutdown As New WindowsController()
shutdown.ExitWindows(shutdown.RestartOptions.LogOff, False)
上一页 [1] [2]
编辑推荐