Nah Progressbar apakah itu Progressbar ??
Pernah melihat suatu aplikasi mempunyai loading ??
Nah inilah salah satu fungsi dari progressbar. Nah terus bagaimana cara
membuat progressbar khusunya di VB.NET ?? Yuk mari kita ikuti tutorial
berikut :
1. Buka Visual Studionya
2. New Project –> Windows Form Application , dan beri nama Progresbar
dan checklist Create directory for solution nya, lihat gambar berikut :
3. Maka akan muncul form1 di lembar kerja Visual Studionya,
4. Design formnya dan tambahkan beberapa label, progressbar dan timer dari toolbox :
Control | Name | Text |
Progressbar | Progressbar1 | - |
Label | Label1 | Mohon tunggu sistem sedang mempersiapkan program……. |
Label | Label2 | Created By : ariartama.com |
Label | Label3 | 2011 |
Timer | Timer1 | - |
Lihat gambar berikut :
5. Double klik formnya sehingga muncul event form load dan coding ini :
6. Double klik timernya sehingga muncul event tick pada timernya dan coding ini :
1: If Pb_Loading.Value < 100 Then
2: Pb_Loading.Value += 2
3: ElseIf Pb_Loading.Value = 100 Then
4: Timer1.Stop()
5: MessageBox.Show("Selamat datang di programku ", "Pemberitahuan", MessageBoxButtons.OK, MessageBoxIcon.Information)
6: End If
7. Code lengkapnya sebagai berikut :
1: Public Class Form1
2: Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
3: If Pb_Loading.Value < 100 Then
4: Pb_Loading.Value += 2
5: ElseIf Pb_Loading.Value = 100 Then
6: Timer1.Stop()
7: MessageBox.Show("Selamat datang di programku ", "Pemberitahuan", MessageBoxButtons.OK, MessageBoxIcon.Information)
8: End If
9: End Sub
10:
11: Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
12: Timer1.Start()
13: End Sub
14: End Class
8. Jadi deh tuh progressbar, tinggal running alias di F5 dan tunggu apa yang akan terjadi, lihat gambar berikut :
Sekian yang dapat saya posting pada kesempatan ini semoga bermanfaat :)
Tidak ada komentar:
Posting Komentar