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
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
Jalankan Program dan juga buat file aplikasinya biar bisa berjalan tanpa visual basic.
Baca juga:
Simulasi Running Led dengan Visual Basic
Simulasi Lampu merah dengan Visual Basic
Kontrol Program dalam BASCOM AVR
Dasar Pemrograman Mikrokontroler dengan BASCOM AVR
Keyword: Belajar visual basic, visual basic, belajar VB, program VB, belajar program VB, aplikasi sederhana, aplikasi VB, aplikasi visual basic, belajar program, program shutdown, program shutdown otomatis, membuat program VB, membuat program shutdown otomatis, shutdown otomatis
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 programnyaPrivate 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
Jalankan Program dan juga buat file aplikasinya biar bisa berjalan tanpa visual basic.
Gambar Program yang telah dijalankan
Semoga bermanfaatBaca juga:
Simulasi Running Led dengan Visual Basic
Simulasi Lampu merah dengan Visual Basic
Kontrol Program dalam BASCOM AVR
Dasar Pemrograman Mikrokontroler dengan BASCOM AVR
Keyword: Belajar visual basic, visual basic, belajar VB, program VB, belajar program VB, aplikasi sederhana, aplikasi VB, aplikasi visual basic, belajar program, program shutdown, program shutdown otomatis, membuat program VB, membuat program shutdown otomatis, shutdown otomatis
0 komentar:
Posting Komentar