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).
Sudah semuanyaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa. LANJUT
Sekarang kembali kearea kerja kemudian klik icon progress bar. 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()
ProgressBar1 = ProgressBar1 + 99
End
End Sub
Private Sub Form1_Load()
Dim ProgressBar1 As Integer
ProgressBar1.Max = 99999
ProgressBar1.Min = 99999
End Sub
0 komentar:
Posting Komentar