Tanpa bertele-tele, berbelit-belit, dan tanpa yg lainnya saya akan menjelaskan cara membuat progress bar sederhana dengan VB6.



Kalo bisa jalan /gak bisa jalan programnya, kasih komentar aja ke saya, ntar saya bales. Yang cm lihat2 kalo bs kasih jg comment ke saya. Makasih.
- Buka Visual Basic 6.0, setelah itu pilih form standar.exe
- Pada properties form, ganti captionnya menjadi, Progress Bar
- Kemudian, klik kanan pada bagian kosong di toolbar general dan pilih components atau melalui menu Project -> Components, seperti ini :
- Pada tab components, pilih Microsoft Windows Common Controls 6.0 (SP6), kemudian klik Apply lalu OK.
- Selanjutnya masukkan, 1 buah progress bar dan 1 buah timer, seperti ini :
- Setelah itu klik 2 kali pada Timer1
- Lalu, masukkan ini :
If ProgressBar1.Value = 100 Then ProgressBar1.Value = 0 Else ProgressBar1.Value = Val(ProgressBar1.Value) + Val(1) End IfEnd Sub
- Setelah itu, close Form1Code tersebut, dan klik lg pd timer1.
- Ganti intervalnya menjadi 100
- Kemudian coba compile dengan menekan tombol play.
- Jika berhasil tampilannya seperti ini:
Kalo bisa jalan /gak bisa jalan programnya, kasih komentar aja ke saya, ntar saya bales. Yang cm lihat2 kalo bs kasih jg comment ke saya. Makasih.
0 komentar:
Posting Komentar