Trik VB menutup semua Program

Hallo Kawan Semua masih Bersama rizki ada sedikit Trik Buat Kawan kawan semua trik yang kali ini rizki Bagikan adalah Bagaimana kita menutup semua Program dengan hanya satu kali klik dengan pemrograman vb nah trik nie cukup berguna karna Instant kita gak perlu menuup satu persatu program yang kita jalankan tapi cukup dengan hanya satu tombol saja.

nah kewan eeh salah maksd aku kawan sebelum memulai alangkah baiknya membuat dulu sebuah form dan tambahkanlah 1 command button gunkan lah nama "Tutup Semua Program"

From Declaration

Private Declare Function BroadcastSystemMessage _

Lib "user32" (ByVal dw As Long, pdw As Long, _

ByVal un As Long, ByVal wParam As Long, _

ByVal lParam As Long) As Long

Pendeklarasian variabel yang diperlukan

Const BSF_POSTMESSAGE = &H10

Const BSM_APPLICATIONS = &H8

Const WM_SYSCOMMAnd = &H112

Menutup aplikasi ketika Command1 di klik

Private Sub Command1_Click()

BroadcastSystemMessage BSF_POSTMESSAGE, _

BSM_APPLICATIONS, WM_SYSCOMMAnd, &HF060&, ByVal 0&

End Sub

nah kalo belajar kawan tinggal copy paste sintak siatas semoga trik dari bejo kali ini bermanfaat 

(Peringatan Bila terjadi Debug Hubungi Rumah sakit Terdekat) heheehe