Membuat Aplikasi shutdown Dengan VB 6.0
Siang sobat Teknologi Masa Kini ^_^
Kali ini saya akan membahasas tentang Membuat Aplikasi shutdown Dengan VB 6.0
-Pertama buka Aplikasi VB 6.0
-Pilih standart EXE lalu Open
- Tambahkan 3 buah Command Button dari toolbox ke desain form
- 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
- Jika Command button telah ditambahkan dan nilai properties dari masing-2 objek telah diatur,
-Jika form telah didesain, 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
-Simpan
Keterangan :
-s = shutdown
-r = restart
-l = logoff
-t 00 = interval waktu antara penekanan tombol shutdown dengan pemanggilan perintah shutdown.exe
Semoga Bermanfaat :)
Download modulnya DISINI
Download Softwarenya DISINI
Download Yang asli itu asli buatan ane :)
Kali ini saya akan membahasas tentang Membuat Aplikasi shutdown Dengan VB 6.0
-Pertama buka Aplikasi VB 6.0
-Pilih standart EXE lalu Open
- Tambahkan 3 buah Command Button dari toolbox ke desain form
- 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
- Jika Command button telah ditambahkan dan nilai properties dari masing-2 objek telah diatur,
-Jika form telah didesain, 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
-Simpan
Keterangan :
-s = shutdown
-r = restart
-l = logoff
-t 00 = interval waktu antara penekanan tombol shutdown dengan pemanggilan perintah shutdown.exe
Semoga Bermanfaat :)
Download modulnya DISINI
Download Softwarenya DISINI
Download Yang asli itu asli buatan ane :)
Sip dah :D programmer muda :)
BalasHapuscomment back ya di http://googleexxx.blogspot.com
OK download juga contohnya ya :)
Hapus