Diberdayakan oleh Blogger.

Mengenai Saya

Foto saya
My name is Jesi Puspika Sari

Jumat, 12 April 2013

CARA MEMBUAT PROGRESSBAR VB NET

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 : New Project 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 : Design Form  5. Double klik formnya sehingga muncul event form load dan coding ini :
   1: Timer1.Start()
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 : Progressbar Sekian yang dapat saya posting pada kesempatan ini semoga bermanfaat :)

Tidak ada komentar:

Posting Komentar