Progress bar merupakan tampilan yang pertama tampil sebelum Form Utama muncul, tampilan ini juga dapat mempercantik aplikasi program yang telah dibuat.
Pada kesempatan ini saya mau coba sharing tentang cara menggunakan Progress Bar pada Visual Basic .Net. Informasi ini hanya untuk sekedar sharing.
Langkah awal yang harus dilakukan adalah
1. Buka Visual Studio 2008
a. Label1 >” Silahkan Tunggu……”
b. Label2 > 0%
c. Timer1 > TimerProgress
d. ProgressBar1 >>PB_loading
4. Klik 2 kali pada Timer1 dan masukkann Listing dibawah ini.
Private Sub TimerProgress_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TimerProgress.Tick
If PB_loading.Value < 100 Then
PB_loading.Value += 2
ElseIf PB_loading.Value = 100 Then
TimerProgress.Stop()
MessageBox.Show(“Terima Kasih”, “Pemberitahuan”, MessageBoxButtons.OK, MessageBoxIcon.Information)
MenuUtama.Show()
Me.Hide()
End If
lblprogress.Text = FormatPercent((PB_loading.Value / 100), 0)
If PB_loading.Value < 100 Then
PB_loading.Value += 2
ElseIf PB_loading.Value = 100 Then
TimerProgress.Stop()
MessageBox.Show(“Terima Kasih”, “Pemberitahuan”, MessageBoxButtons.OK, MessageBoxIcon.Information)
MenuUtama.Show()
Me.Hide()
End If
lblprogress.Text = FormatPercent((PB_loading.Value / 100), 0)
5. Klik 2 kali pada Form dan masukkan listing dibawah ini:
Private Sub FormProgress_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TimerProgress.Start()
End Sub
TimerProgress.Start()
End Sub
6. Coba Run, dan jika berhasil maka tampilan program akan seperti ini
Semoga Informasinya berguna dan dapat dikembangkan kearah yang lebih baik, terima kasih…..
No comments:
Post a Comment