Progress Bar di Dot Net

1. Pilih File - New Project - Windows Forms Application

2. Tambahkan Timer pada bagian Components (disini diberi nama Timer1) dan ProgressBar pada bagian Common Controls.

3. Klik Timer1 dan ubah atribut Enabled menjadi True pada bagian Properties.
4. Pilih Project-Add Windows Form (disini diberi nama Form2).

5. Buka Form1.vb, tambahkan kodingan berikut :

'membuat objek dari class Form2
Dim objform As New Form2

'Deklarasi dan Inisialisasi variabel global x
Dim x As Integer = 10

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick ProgressBar1.Value = x

If x < x =" x">
Else
objform.Show()
Me.Hide()
Timer1.Enabled = False
End If

End Sub

5. Run (tekan F5).

Maximum value dari ProgressBar1 adalah 100, maka terdapat kondisi jika x < style="font-weight: bold;">x ditambah dan value ProgressBar1 diset sebanyak x. Jika x >= 100, maka objform muncul, form1 di-hide dan Timer1 tidak dapat digunakan.

Semoga tutorial ini bermanfaat ^^V..

Note : Tutorial menggunakan Visual Basic 2008 Express Edition