东营信息港
游戏
当前位置:首页 > 游戏

強制關閉計算機

发布时间:2019-06-02 07:59:23 编辑:笔名
预防老年痴呆吃什么好
乳腺癌初期容易治么
乳腺癌饮食建议和食疗菜谱

  用API函数ExitWindowsEx可以实现强制关机,即便是您的应用程序尚未保存文件

  Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

  Const EWX_SHUTDOWN = 1

  Const EWX_LOGOFF = 0

  Const EWX_REBOOT = 2

  Const EWX_FORCE = 4

  Private Sub Command1_Click()

  Dim a

  a = ExitWindowsEx(EWX_LOGOFF or EWX_FORCE or EWX_SHUTDOWN, 0)

  End Sub

  如果将

  a = ExitWindowsEx(EWX_LOGOFF or EWX_FORCE or EWX_SHUTDOWN, 0)

  改换为

  a = ExitWindowsEx(EWX_LOGOFF or EWX_REBOOT, 0)

  即可实现强制重启计算机

  查看本文来源

零售分享经济成风潮 信用免押金成标配
唱吧小程序“小唱猜歌”火热来袭
赤峰西城市场鸡蛋价格上涨了2毛多