Splash Screen VB.NET

Splash Screen merupakan suatu istilah bagi Form hiasan yang ditampilkan sebelum Form utama ditampilkan. Proses pembuatannya sangat mudah, berikut caranya :

- Membuat Project Baru dan menambahkan item yang telah tersedia yaitu splash screen.. 

 

Add New Item Splash Screen

- Setelah itu form di desain seperti dibawah ini
   Item yang digunakan adalah Label, ProgreesBar dan Komponen Timer

- Pada Timer1 kita berikan kode dibawah ini

ProgressBar1.Value += 2
        If ProgressBar1.Value <= 30 Then
            Label1.Text = "Initializing....."
        ElseIf ProgressBar1.Value <= 50 Then
            Label1.Text = "Loading components....."
        ElseIf ProgressBar1.Value <= 70 Then
            Label1.Text = "Integrating Database...."
        ElseIf ProgressBar1.Value <= 100 Then
            Label1.Text = "Please wait..."
        End If
        If ProgressBar1.Value = 100 Then
            Timer1.Dispose()
            Me.Visible = False
            cur = New Frm2_Login()
            cur.Show()
        End If

- note timer property .enable = true .interval = 1000

Posted in: VB.NET