fork download 
  1. Public Module ShutdownTest  
  2.  
  3.    ' Đây là hàm API dùng để thoát khỏi Windows.
  4.     Private Declare Function ExitWindowsEx Lib "user32" _
  5.       (ByVal uFlags As Long, ByVal dwReserved As Long) As Long  
  6.     ' Kiểu liệt kê này giữ các hằng liên quan.
  7.  
  8.     Private Enum ExitWindowsFlags
  9.  
  10.         ' Sử dụng hằng này để đăng xuất mà không khởi động lại.
  11.  
  12.         Logoff = 0  
  13.  
  14.         ' Sử dụng hằng này để khởi động lại hệ thống.
  15.  
  16.         Reboot = 2  
  17.  
  18.         ' Sử dụng hằng này để tắt hệ thống
  19.         ' (và tắt máy tính, nếu phần cứng hỗ trợ).
  20.  
  21.         Shutdown = 1
  22.  
  23.         ' Sử dụng hằng này để buộc hệ thống tắt hay
  24.         ' khởi động lại (ngay cả khi người dùng đã hủy bỏ nó).
  25.         Force = 4
  26.     End Enum
  27.  
  28.     Public Sub Main()
  29.         ExitWindowsEx(ExitWindowsFlags.Logoff, 0&)
  30.     End Sub
  31. End Module
Runtime error #stdin #stdout 0.07s 15936KB
comments (?)
stdin 
Standard input is empty
stdout 
Standard output is empty
https://ideone.com/6ZNYW
language:
VB.NET (mono-3.10)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!