Aplikasi Shutdown VB

Membuat Aplikasi Shutdown dengan Visual Basic 6.0

1- Buka Microsoft Visual Basic 6.0
    Akan muncul jendela seperti dibawah :

      

2- Pilih standart Exe, kemudian klik tombol Open, 

    maka akan muncul area kerja Visual Basic 6.0

3- Dari gambar diatas, tambahkan 3 buah Command Button dari toolbox ke desain form
4- Ubah juga nilai propertis pada masing-masing objek :
   - Form1 :
      - Caption : Aplikasi Shutdown
      - MaxButton : False
      - MinButton : False
      - BorderStyle : 1-FixedSingle
   - Command1 :
      - (Name) : Cmd_Shutdown
      - Caption : Shutdown
   - Command2 :
      - (Name) : Cmd_Restart
      - Caption : Restart

   - Command3 :
      - (Name) : Cmd_LogOff
      - Caption : Log Off
5- Jika Command button telah ditambahkan dan nilai properties dari masing-2 objek telah diatur,        sekarang atur desain form 

         Contoh gambar dibawah :

6- Jika form telah didesain seperti diatas, sekarang saatnya untuk penulisan listing code dengan  cara menekan F7 atau mengklik 2x salah satu objek. kemudian ketikkan listing dibawah : 

Private Sub Cmd_Logoff_Click()

    Call Shell("C:\Windows\System32\Shutdown.exe -l -t 00", vbHide)

End Sub

Private Sub Cmd_Restart_Click()
    Call Shell("C:\Windows\System32\Shutdown.exe -r -t 00", vbHide)
End Sub
Private Sub Cmd_Shutdown_Click()
    Call Shell("C:\Windows\System32\Shutdown.exe -s -t 00", vbHide)
End Sub 

ingat jangan salah memasukan kodenya... jika salah, tombol fungsi tidak akan sesuai perintah..  tapi kalo buat isengin temen yaaaa...... terserah kalian...

Keterangan : 
  -s = shutdown
  -r = restart

  -l = logoff
  -t 00 = interval waktu antara penekanan tombol shutdown dengan pemanggilan perintah shutdown.exe

sumber : http://xxxfilxx.blogspot.com