ในโปรแกรม Visual Basic คุณสามารถใช้ฟังก์ชัน Windows API เพื่อรีสตาร์ทระบบคอมพิวเตอร์ได้ ข้อความนี้อธิบายวิธีการออกจาก Windows 95 และปิดระบบคอมพิวเตอร์
#ปิดระบบคอมพิวเตอร์
คุณสามารถใช้ฟังก์ชันExitWindowsExของ Windows API เพื่อรีสตาร์ทระบบคอมพิวเตอร์จากโปรแกรม Visual Basic หากต้องการใช้ฟังก์ชันนี้ ให้รวมคำสั่งการประกาศต่อไปนี้ไว้ในส่วนการประกาศปกติของแบบฟอร์ม:
PRivateDeclareFunctionExitWindowsExLib "user32" (ByVal
uFlagsAsLong, ByValdwReservedAsLong) ตราบใดที่
ฟังก์ชัน ExitWindowsEx ต้องใช้พารามิเตอร์ 2 ตัว คุณสามารถใช้ค่าสถานะต่อไปนี้รวมกันอย่างน้อยหนึ่งรายการเพื่อบอกฟังก์ชัน ExitWindowsEx ที่คุณต้องการดำเนินการปิดระบบ
EWX_FORCE กระบวนการทั้งหมดถูกบังคับให้ยุติ
EWX_LOGOFF กระบวนการทั้งหมดถูกบังคับให้ยุติ และผู้ใช้จะออกจากระบบ (ออกจากระบบ)
EWX_POWEROFF ระบบคอมพิวเตอร์ถูกปิด และหากรองรับคุณสมบัติการประหยัดพลังงาน คอมพิวเตอร์จะปิดตัวลงจริง
EWX_REBOOTระบบคอมพิวเตอร์ถูกปิดและรีสตาร์ท
EWX_SHUTDOWN คอมพิวเตอร์ถูกปิดระบบทางกายภาพและปลอดภัย
โปรแกรมตัวอย่างต่อไปนี้ใช้การรวมกันของสามค่าสถานะข้างต้น การรวมกันของแฟล็กนี้ (EWX_LOGOFF, EWX_FORCE และ EWX_REBOOT) บอกให้ Windows95 ออกจากการทำงานปกติทั้งหมด
ในระหว่างกระบวนการดำเนินการ ผู้ใช้ล็อกเอาต์ออกจากเครือข่าย และทำให้ระบบคอมพิวเตอร์อยู่ในสถานะพร้อมให้ผู้ใช้ปิดระบบ
#ตัวอย่างโปรแกรม
โปรแกรมตัวอย่างนี้แสดงวิธีการปิดระบบคอมพิวเตอร์
1. เริ่มโครงการใหม่ใน Visual Basic และใช้วิธีการเริ่มต้นเพื่อสร้าง Form1
2. เพิ่มค่าคงที่และคำสั่งการประกาศต่อไปนี้ในส่วนการประกาศปกติของ Form1 (โปรดทราบว่าจำเป็นต้องเขียนคำสั่งการประกาศในหนึ่งบรรทัด):
PrivateDeclareFunctionExitWindowsExLib "user32" (ByVal
uFlagsAsLong, ByValdwReservedAsLong) ตราบใดที่
ConstEWX_LOGOFF=0
ConstEWX_SHUTDOWN=1
ConstEWX_REBOOT=2
ConstEWX_FORCE=4
ConsEWX_POWEROFF=8
ConstEWX_RESET=EWX_LOGOFF EWX_FORCE EWX_REBOOT
3. เพิ่มตัวควบคุมปุ่มคำสั่งให้กับ Form1 และใช้วิธีการเริ่มต้นเพื่อสร้าง Comand1 ตั้งค่าคุณสมบัติคำอธิบายภาพเป็น "รีสตาร์ทคอมพิวเตอร์"
4. เพิ่มรหัสต่อไปนี้ในเหตุการณ์การคลิกของ Command1:
PrivateSubCommand1_คลิก()
DimXAsLong
X=ออกจาก WindowsEx (EWX_RESET, dwReserved)
สิ้นสุดย่อย
กด F5 เพื่อรันโปรแกรมตัวอย่างข้างต้น และคลิกปุ่มคำสั่งเพื่อรีสตาร์ทระบบคอมพิวเตอร์ -