Rabu, 22 Juni 2011

Membuat Program Shutdown Otomatis dengan Visual Basic

Sudah lama tidak berinteraksi dengan visual basic (VB), terakhir pun saya tulisan mengenai visual basic tentang Simulasi Lampu merah dengan Visual Basic dan Simulasi Running Led dengan Visual Basic maklum masih pemula dan kali ini saya mencoba untuk membuat aplikasi sederhana namun cukup berguna untuk pemakai komputer / laptop yang mempunyai kebiasaan meninggalkan komputernya dalam keadaan menyala baik karena bosen menunggu proses download yang lama atau proses copy file maka salah satu solusinya adalah kita membuat jadwal shutdown otomatis dengan program shutdown otomatis dengan Visual basic


Berikut Toolbox yang diperlukan

1 buah timer
2 buah label penampil waktu (bisa juga menggunakan text)
2 buah text
2 buah option
2 buah command button

dan beberapa label untuk keterangan


Berikut gambar susunan toolbox pada form



Gambar Bentuk Form
Listing programnya

Private Sub Command1_Click()
jam = Text1.Text
menit = Text2.Text
If Option1 = True Then
x = "AM"
Else
x = "PM"
End If
waktu = jam + ":" + menit + ":" + "00" + x
MsgBox "Komputer Mati pada:" & waktu
Label7 = waktu
End Sub

Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Option1 = False
Option2 = False
Label7.Caption = ""
Command1.Enabled = False
Text1.SetFocus
End Sub

Private Sub Option1_Click()
Command1.Enabled = True
End Sub

Private Sub Option2_Click()
Command1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Label6 = Time
If Label7.Caption = Label6.Caption Then
Call Shell("rundll32.exe user,exitwindows", vbHide)
End If
End Sub

1 komentar:

  1. Keren gan, lanjut terus....Kalau butuh video tutorial program lain datang ke sini ya gan: http://www.jualtutorialku.com/tutorial-programing
    Semua video tutorialnya pakai bahasa Indonesia.

    BalasHapus

Silahkan tinggalkan komentar...