Membuat Jendela Splash Screen dengan Microsoft Visual Basic 2008 Express Edition

Pada Microsoft Visual Basic 2008 Express Edition terdapat fasilitas untuk membuat Jendela Splash Screen. Jendela Splash Screen ini digunakan untuk menampilkan informasi yang berkaitan dengan aplikasi dan menunggu proses membuka jendela utama, jendela ini otomatis akan hilang saat jendela utama selesai ditampilkan. Jendela ini ditampilkan saat aplikasi pertama dijalankan. Jendela Splash Screen dapat dilengkapi dengan toolbox progress bar untuk menambahkan fitur loading pada splash screen.

Pada tutorial ini diasumsikan bahwa pengguna sudah dapat menggunakan program Microsoft Visual Basic 2008 Express Edition. Untuk membuatnya, ikuti langkah-langkah berikut ini

1. Pilih menu Project, Add New Item…, atau pilih icon  add new item atau melalui shortcut keyboard, tekan CTRL+SHIFT+A.                       






2. Setelah muncul kotak dialog “Add New Item”, pilih Splash Screen, isikan nama file pada kotak Name, misalnya “SplashScreen.vb”, klik Add.





3. Muncul tampilan jendela SplashScreen secara default seperti pada gambar di bawah ini.





4. Susun komponen jendela SplashScreen seperti gambar berikut, pengaturan  dilakukan pada form SplashScreen  dan properties komponen. Form ini terbagi menjadi dua kolom dan lima baris.





5. Jalankan Aplikasi, Hasil dari pembuatan jendela Splash Screen akan tampak seperti gambar berikut.

Tahapan selanjutnya yaitu menambahkan komponen progress bar untuk menampilkan proses loading splash screen. Jendela SplashScreen akan ditampilkan sesuai waktu jalannya progress bar. Untuk membuat fitur ini perlu ditambahkan komponen progress bar dan komponen timer dari toolbox ke form SplashScreen. Langkah-langkahnya adalah sebagai berikut:

1. Drag and drop komponen progress bar dari toolbox ke form SplashScreen. Hasilnya tampak seperti gambar berikut.





2. Drag and drop komponen timer dari toolbox ke form SplashScreen.
3. Double klik pada Timer1 untuk memberikan kontrol waktu dengan kode program.
   
   
   
   Muncul prosedur Timer1_Tick seperti pada kode SplashScreen.

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick    End Sub

          

           4.  Tambahkan baris kode berikut ini ke dalam prosedur SplashScreen_Load.

Me.Timer1.Enabled = True

     5.  Tambahkan kode program berikut ke dalam prosedur Timer1_Tick.

ProgressBar1.Value += 10 If ProgressBar1.Value = 100 Then    Timer1.Dispose()'mengakhiri timer    Form1.Show()'membuka Form1 setelah jendela SplashScreen Tertutup End If

          6.      Jalankan Program. Hasilnya tampak seperti gambar di bawah ini.

Artikel Terkait