Shutdown Komputer

Kali ini saya akan mencoba membuat program sederhana untuk mematikan komputer/Shoutdown hanya dengan aplikasi Visual Basic.


caranya adalah sebagai berikut.

1. Buat form baru dan tambahkan kontrol pada form hingga seperti gambar diatas.
2. Ketik kode berikut pada kode editor yang telah tersedia.
Private Sub cmdlog_Click()
Dim log As String
log = MsgBox("Anda ingin Log Off ?", vbYesNo, "Jawab Ya...!")
If log = vbYes Then
Shell "shutdown -l -f -t 0"
End If
End Sub

Private Sub cmdrestart_Click()
Dim rs As String
rs = MsgBox("Anda ingin Restart ?", vbYesNo, "Jawab Ya...!")
If rs = vbYes Then
Shell "shutdown -r -f -t 0"
End If
End Sub

Private Sub cmdshutdown_Click()
Dim sd As String
sd = MsgBox("Anda ingin Shutdown ?", vbYesNo, "Jawab Ya...!")
If sd = vbYes Then
Shell "shutdown -s -f -t 0"
End If
End Sub

3. Jangan lupa disimpan yaaaaa....!

Jika anda kurang menarik dengan tampilan diatas, maka kreasilah semau anda....! oce

I LOVE YOU FULL