Membuat Splash Screen & ProgressBar VB

Nah Kali ini saya akan berbagi ilmu tentang Bagaimana Sih kalo membuat splash screen pada awal program kita dijalankan?
splash screen biasa banyak digunakan untuk program-program yang berbasis Multimedia, seperti Office, Photoshop, Corel Draw, dan masih banyak Lagi,,
Splash Screen berfungsi sebagai pelengkap ato Pemanis Program kita (Kaya Gula Aja :D ),,, tidak perlu panjang Lebar langsung  aja ke TKP!!
Bahan-bahan Yang harus dipersiapkan :
1. Form1 sebagai form Utama Program Atau Bisa Juga Pakai MDI Form tergantung jenis Program kita
2. Setelah itu kita tambah lagi form Splash . dengan cara Klik Kanan Pada Form1 Pilih Add, Form, pilih Splash Screen
3. Pada Splash Form sudah ada Sampel sampel nya kan ? Lihat gambar

 

edit lah Label label yang ada dengan text sesuain program apa yang anda inginkan.

4. setelah itu sisipkan Tools ProgressBar pada Form tersebut..

5. sisipkan Timer (tools yang gambar Jam bekker )

6. Sisipkan Label dibawah Progress Br dengan NAME = lblbar

Jika Bahan bahan sudah siap , sekarang Mari kita Uji coba Hehehehe, sebelum itu rubah Interval Timer1 dari 0 menjadi 500 (Sesuai kebutuhan).

setelah itu Double Klik pada Komponen Timer1.timer tulis koding berikut :

-------------------------------------------------------------------------------------------

PRIVATE SUB TIMER1_TIMER ()

Bar.Value = Bar.Value + 2

Screen.Mousepointer = Vbhourglass

If bar.value = 20 Then

     lblbar.caption = "Loading Component . .........."

Elseif bar.value = 40 Then

     lblbar.caption = "Chek System File.........."

Elseif bar.value = 60 Then

     lblbar.caption = "Sanning Virus . .........."

Elseif bar.value = 80 Then

     lblbar.caption = "Finalizing . .........."

Elseif bar.value = 100 then

      If bar.value = 100 then

             If timer1.interval >= 1 then

                 Unload me

                 Load Form1

                 Form1.show

                 screen.Mousepointer = VBdefault

             End if

       End if

End if

End Sub

-------------------------------------------------------------------------------------

Nah, jika sudah selesai mengetik koding coba Jalankan dengan Tekan Tombol F5... 

Berhasil? Sangat Simple

Tapi Untuk Lebih dimengerti Lagi saya akan memberikan keterangan pada setiap koding :

- Screen.Mousepointer = Vbhourglass untuk merubah pointer mouse ke bentuk Jam pasir (pointer loading )

- If bar.value = 20 Then

     lblbar.caption = "Loading Component . .........." menyatakan jika Progress bar sudah sampai ke percent 20 maka akan memunculkan Label Kata "Loading......" dan seterusnya.

-  If bar.value = 100 then

             If timer1.interval >= 1 then

                 Unload me

                 Load Form1

                 Form1.show

                 screen.Mousepointer = VBdefault

             End if menyatakan jika progress bar sudah ke Percent 100 dan waktu interval lebih sama dengan 1 maka akan kembali ke Form splash (Karna tidak mengecek form1).. dan jika Form1 ada maka akan mengload atau menjalankan Form1/MDI form, , , dan pointer mouse akan kembali ke kursor biasa..

Selesai deeh..... Semoga bermanfaat kalo sempet di Komentarin yah :D

Membuat Tombol Shutdown, Log Off, dan Restart pada Windows

Pertama Buatlah 1 Form Baru yang terdiri dari
1. 3 Frame
2. 3 Command Button

buatlah Desaign Sesuka anda pada Command 1 beri Caption "Shutdown" , command 2 "Log Off" dan Command 3 "Restart" setelah itu Beri Coding di tiap Command Button.
klik 2 kali pada Command 1 dan isikan Kode seperti berikut :

Private Sub Command1_Click()
Shell ("shutdown -s")
End Sub

dan lakukan yang sama untuk Command Button 2 dan 3 akan tetapi Ada sedikit yanng dirubah :

Private Sub Command2_Click()
Shell ("shutdown -l")
End Sub

Private Sub Command3_Click()
Shell ("shutdown -r")
End Sub

Selesai sudah 1 Form yang berfungsi untuk sistem Windows . anda juga bisa membuatnya dalam bentuk Program File (.Exe) agar lebih Simple digunakan tidak Harus membuka File Project lagi..

Selamat Mencoba......

"VB" ?
Singkatan Diatas Mungkin Gag Asing di telinga kita apalagi pada Para Programmer,
ya Visual Basic, Sebuah program Ciptaan Microsoft yang ditujukan kepada user untuk mengolah atau membuat Program Aplikasi yang memang dibutuhkan Oleh User untuk mempermudah Kinerjanya, tapi Kenyataannya banyak sekali User (pengguna Komputer) Engah Melihat Opini itu, mereka hanya Memanfaatkan Program yang sudah jadi,, Memeng Program yang dibuat oleh Pembuat Program (Programmer ) itu untuk digunakan dan dimanfaatkan dalam pekerjaan Kita,
Tapi Tahukah seberapa Sulit, rumit, Mumed, Membuat satu Program Single user atau Multi User seperti itu?
Butuh Waktu banyak agar Program Yang kita buat Menjadi program yang layak untuk di gunakan,, tidak ada kata "Gampang" seorang Programmer membuat Program Tersebut, dalam artian Kata tersebut Memberi Kesan rasa Sombong. padahal Proses Pembuatan ! macam Program itu Butuh waktu untuk merencanakannya, mulai dari mencari Tema Program yang akan dibuat, mencari Referensi dari Internet Entah itu Source Code atau referensi lainnya,, dan Yang paling Penting atau Mutlak diperlukan adalah "LOGIKA".
yah logika, dasar dari pemikiran pembuatan Program itu dengan logika kita jika logika atau analisa kita Baik maka Program yang kita buat pun Bakal Baik Pula , akan tetapi jika Logika kita Kurang maka Siap-siap lah kita menemui banyak Error Loading entah itu Debug, Syntax Error, atau Value Off Null.
yah Memang kenyataannya begitu dalam proses pembuatan Program tak luput dari banyak Kesalahan, tapi jika kita teliti dalam menganalisa program , Insyaallah akan terasa Lancar.
tapi jangan prelu ditakuti karena suatu masalah yang kita hadapi tiu adalah bentuk dari proses dimana kita dituntut untuk menganalisa kesalahan tersebut dan dalam Pemrograman Visual Basic memberikan Informasi jika source Code yang kita ketikan terjadi kesalahan maka secara Otomatis Kursor memblok Code yang dianggap salah.