Berikut langkahnya :
Buka Aplikasi VB 6.0 anda
Buatlah Design Form seperti gambar dibawah ini :
Gambar diatas terdapat :
Command1
Command2
Command3
Command4
Kemudian masukan Koding dibawah ini :
Private Sub Command1_Click()
Call Shell("C:\Windows\System32\Shutdown.exe -r -t 00", vbHide)
End Sub
Private Sub Command2_Click()
Call Shell("C:\Windows\System32\Shutdown.exe -s -t 00", vbHide)
End Sub
Private Sub Command3_Click()
Call Shell("C:\Windows\System32\Shutdown.exe -l -t 00", vbHide)
End Sub
Private Sub Command4_Click()
End
End Sub
Jalankan Aplikasi anda
Hasil Latihan diatas bisa anda Download dengan KLIK LINK INI
Salam
BelajarVB.com