Cara Membuat Progressbar Pada Visual Basic

Visual Basic

---

Mungkin beberapa sudah tahu bagaimana caranya membuat progressbar yang dapat berjalan pada visual basic, tetapi masih ada juga yang belum mengetahuinya. Untuk itu pada artikel kali ini saya akan berbagi tutorialnya, disini saya menggunakan fungsi dari komponen Timer karena itu lebih efektif dan dapat berjalan secara otomatis. Saya sudah menyiapkan source code projectnya juga apabila masih kesulitan dalam membuat ini.

Komponen :

• 1 Timer
• 1 ProgressBar
• 1 Button
• 1 Label

Tambah komponen di atas ke dalam form pada project visual basic Anda dan atur tata letak sesuai keinginan. Contohnya seperti pada gambar berikut :

Ubah pengaturan Timer pada Properties menjadi :

Klik 2x pada Button1 sehingga muncul form codenya, kemudian masukkan kode berikut :

Timer1.Start()

Sehingga fungsi dari button menjadi seperti ini :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Timer1.Start()
End Sub

Lalu klik 2x pada Timer1, ubah agar menjadi :

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
    If ProgressBar1.Value < ProgressBar1.Maximum Then
        'Jika Value dari progressbar belum mencapai value maximum
        'Maka jalankan perintah ini
        Label1.Text = "Loading ..." 'Text dari Label1 Diubah
        ProgressBar1.Increment(+1) 'Value dari progress bar terus ditambah
    ElseIf ProgressBar1.Value = ProgressBar1.Maximum Then
        'Jika Value dari progressbar telah mencapai value maximum
        'Maka jalankan perintah ini
        Label1.Text = "Loading Selesai" 'Text dari Label1 Diubah
        Timer1.Stop() 'Timer1 dihentikan agar tidak berulang lagi
    End If
End Sub

Sekarang coba test aplikasinya dengan debugging, klik tombol nya untuk memluai progressbar agar berjalan. Saya sudah menyediakan contoh Source Codenya yang dapat diunduh gratis dibawah ini.

Source Code

Download