Membuat Progressbar Pada VB 6.0

Buatlah project baru dengan pilihan standart exe, kemudian tambahkan component progress bar, dengan cara klik kanan pada area toolbox. Pilih component, pada tab control. Kemudian pilih dengan cara beri tanda centang Microsoft windows common control 6.0 (SP6). Buatlah sebuah progressbar pada form anda. Dan buatlah sebuah command button, Seperti pada gambar berikut: Kemudian ketikkan coding (kalo malas copy paste aja) berikut pada coding editor anda dengan cara klik icon view code yang ada pada sudut kanan properties project: Private Sub Command1_Click() With Me.ProgressBar1 .Appearance = ccFlat .Scrolling = ccScrollingSmooth .Max = 10000 .Min = 0 .Value = 0 Dim i As Integer For i = .Min To .Max .Value = i Next i MsgBox "Complete", vbInformation, "Information" .Value = 0 End With End End Sub Setelah itu klik tombol start atau tekan F5 pada keyboard anda. Sumber:http://jenggotcommunity.blogspot.com/2008/09/membuat-progressbar-pada-vb-60.html (dimodifikasi)