Bismillah...
Bahasa Pemrograman Visual Basic 6.0 belum lekang tergoda jaman, eksistensinya masih di perhitungkan dalam jagat pemrograman, buktinya di beberapa kampus masih di ajarkan ihwal pemrograman Visual Basic 6.0 ini, meskipun sudah muncul Microsoft Visual Studio atau yang lebih dikenal dengan VB.NET.
Apa yang membuat Visual Basic 6.0 begitu “Abadi”?
Ini bicara masa kemudian yang mungkin sulit untuk dilupakan, dengan kata lain Visual Basic 6.0 mempunyai nilai history yang sangat tinggi. Mengapa demikian? Karena Visual Basic 6.0 pada sebagain para programmer jaman OLD (atau mungkin seluruhnya) mempunyai rentetan cerita-cerita kejayaan yang tak sanggup tergantikan pada masa ke emasan di jamannya. Sehingga Visual Basic 6.0 mempunyai ruang tersendiri di dalam hati para programmer. Bukan problem gagal move on, tapi problem story dan history klasik yang sulit untuk di ungkapkan dengan kata-kata.
Bagi para programmer jaman NOW yang tidak mengalami masa-masa transisi dari Visual Basic 6.0 ke Microsoft Visual Studio (VB.NET) tak akan sanggup mencicipi suasana hati yang sulit untuk di tangkap oleh panca indera insan biasa (yang ini lebay).
Sudahlah.... tidak usah lama-lama bernostagia, tak tega rasanya hati ini untuk melanjutkan kisah ini. Lebih baik kita berguru salah satu yang sanggup dilakukan oleh Visual Basic 6.0 pada jaman OLD yang mungkin sanggup sedikit memperlihatkan pencerahan dalam hal pemrograman.
Apa yang akan kita pelajari NOW?
Proses Shutdown/Turn Off untuk mematikan komputer dan restart untuk melaksanakan warm booting atau menghidupkan ulang komputer memang sudah di fasilitasi oleh sistem operasi. Namun keseruan dalam pemrograman dengan Visual Basic 6.0 pada ketika itu ialah kita sanggup menciptakan aplikasi yang dipakai untuk men-Shutdown ataupun Me-Restart komputer kita dengan memakai aplikasi yang kita buat. Widiiii.....h keren Kan?
Ok, untuk menghilangkan rasa penasaran, kita akan coba mempraktekkan bagaimana cara menciptakan aplikasi Shutdown Personal Computer (PC) dengan memakai Visual Basic 6.0.
Pastikan di PC/Komputer anda sudah terinstal aplikasi bahasa pemrograman Microsoft Visual Basic 6.0. Bagi yang belum ada silahkan d0wnl0ad Microsoft Visual Basic 6.0 Portabel berikut ini
Silahkan ikuti langkah-langkahnya berikut ini:
1. Masuk kedalam aplikasi Ms. Visual Basic 6.0
2. Siapkan Form kemudian design menyerupai teladan gambar berikut ini:
Keterangan gambar:
No. 1 = Label
No. 2, 3, 4 = CommandButton
No. 5 = Timer1
3. Kemudian lakukan setting properties
No. 1. Pada bab Caption ketika “Apa yang akan anda lakukan?”
No. 2. Pada bab Name = CmdLog, Caption = &Log Off
No. 3. Pada bab Name = CmdRestart, Caption = &Restart
No. 4. Pada bab Name = CmdShutdown, Caption = &Shutdown
4. Kemudian ketikkan coding di bawah ini:
Double Click pada tombol Log Off, ketik coding di bawah ini:
Private Sub cmdLog_Click()
Dim Log As String
Log = MsgBox("Anda ingin Log off ?", vbYesNo, "Nanya Nech...!!!")
If Log = vbYes Then
Call Shell("C:\Windows\System32\Shutdown.exe -l -t 00", vbHide)
Else
MsgBox "Ngak Makara Log Off...!!!", vbInformation, "Informasi"
End If
End Sub
Double Click pada tombol Restart, ketik coding di bawah ini:
Private Sub cmdRestart_Click()
Dim Aku As String
Aku = MsgBox("Anda ingin Restart ?", vbYesNo, "Nanya Nech...!!!")
If Aku = vbYes Then
Call Shell("C:\Windows\System32\Shutdown.exe -r -t 00", vbHide)
Else
MsgBox "Ngak Makara Restart...!!!", vbInformation, "Informasi"
End If
End Sub
Double Click pada tombol Shutdown, ketik coding di bawah ini:
Private Sub cmdShutdown_Click()
Dim Cinta As String
Cinta = MsgBox("Anda ingin Shutdown ?", vbYesNo, "Nanya Nech...!!!")
If Cinta = vbYes Then
Call Shell("C:\Windows\System32\Shutdown.exe -s -t 00", vbHide)
Else
MsgBox "Ngak Makara Shutdown...!!!", vbInformation, "Informasi"
End If
End Sub
5. Jika sudah selesai, silahkan di running atau dijalankan kemudian di test dengan meng-klik tombol restart atau shutdown
Demikian pembahasan kita kali ini ihwal Membuat aplikasi Shutdown PC dengan VB.6. Mudah-mudahan sanggup membantu dalam proses berguru pemrograman, khususnya Pemrograman Visual Basic 6.0.
Untuk teladan aplikasinya yang sudah dalam bentuk .exe dan sanggup pribadi dipakai silahkan d0wnl0ad dan extrak file rar di bawah ini. Aplikasi ini sudah sedikit saya modifikasi dengan menambahkan timer.
Sumber http://pabaiq.blogspot.com
EmoticonEmoticon