Progressbar biasanya dibutuhkan untuk memvisualisasikan sebuah data dengan range yang sudah diketahui. Progressbar dapat dengan mudah dijumpai pada beberapa aplikasi. Di windows sendiri bisa dijumpai saat kita memindah file dari sebuah directory ke directory lainnya.
Salah satu kegunaan progressbar adalah memberikan aspek psikologis kepada user tentang suatu proses yang sedang berlangsung. Dengan adanya progress bar, user bisa mengetahui berapa lama suatu proses telah berlangsung dan berapa waktu yang dibutuhkan selanjutnya.
Selain itu, progressbar juga dapat digunakan untuk menampilkan suatu data pengukuran. Misalnya disini dicontohkan untuk menampilkan suatu nilai RPM. Dengan ditampilkan pada sebuah progressbar, user dengan mudah akan dapat mengetahui berapa persen (%) nilai aktual dibandingkan nilai maksimum yang ada.
Progressbar ini dapat dibuat dengan memanfaatkan komponen sebuah Shape yang nilai properties Width dapat dibuat sebagai variabelnya.
[sourcecode]Function ShapeBar(ProgressBarValue As Integer, ProgressBarName As Shape)
ProgressBarName.Width = ProgressBarValue * 10 ' Write here the value for one percent
If ProgressBarName.Width > 9975 Then
ProgressBarName.Width = 9975
End If
End Function[/sourcecode]Kemudian untuk membuat sebuah simulasi, ditambahkan komponen HScroll1 dengan nilai maksimum ditentukan sesuai keinginan. Kemudian pada fungsi Private Sub HScroll1_Change() ditambahkan code:
[sourcecode]
Private Sub HScroll1_Change()
MyFunctionProgressBar = ShapeBar(HScroll1.Value * 10, BarRPM)
End Sub[/sourcecode]
Berikut adalah beberapa contoh hasilnya.
Demikian, semoga bermanfaat.
Discussion (46) ¬
tadalafil capsules 20mg tadalafil tablets 20 mg buy
https://buytadalafil.men/# generic tadalafil 10mg
metformin 500 mg tablet price metformin 10 tablet
metformin coupon pharmacy metformin generic price
glucophage metformin metformin pharmacy
nolvadex 10mg tamoxifen for breast cancer prevention
https://buynolvadex.store/# nolvadex half life
tamoxifen adverse effects tamoxifen endometrium
buy cipro online ciprofloxacin 500mg buy online
buy losartan for sale – cheap esomeprazole 40mg buy promethazine 25mg without prescription
https://gabapentin.icu/# neurontin 100 mg cost
online prescription for ed meds sildenafil without a doctor’s prescription
https://erectionpills.best/# erection pills online
meds online without doctor prescription canadian pharmacy online
lasix and prednisone furosemide 20 mg tab cost what is furosemide side effects which laboratory test result is a common adverse effect of furosemide
diflucan 200 mg capsule diflucan 150 mg capsule
https://withoutprescription.store/# ed meds online canada
ciprofloxacin over the counter cipro for sale
buy cipro online canada buy ciprofloxacin over the counter
drug neurontin 20 mg neurontin 100 mg caps
stromectol ivermectin
https://diflucan.icu/# diflucan buy in usa
https://gabapentin.icu/# cost of neurontin 800 mg
natural ed medications cures for ed
gabapentin online neurontin cost in singapore
https://erectionpills.best/# cheap erectile dysfunction pills
diflucan 200 mg price diflucan australia otc
best male enhancement pills erectile dysfunction drugs
https://erectionpills.best/# erectile dysfunction medications
buy generic neurontin online drug neurontin
best erectile dysfunction pills online ed pills
prescription drugs online buy prescription drugs online legally
Very good written post. It will be valuable to everyone who employess it, as well as yours truly :). Keep doing what you are doing – looking forward to more posts.
cheap levaquin – purchase avodart online cheap canadian cialis online pharmacy
buy cipro cheap ciprofloxacin generic price
diflucan 150 mg caps where can i buy diflucan without a prescription
https://withoutprescription.store/# prescription drugs canada buy online
cost of neurontin 600mg medicine neurontin
https://cipro.best/# buy cipro online without prescription
https://diflucan.icu/# diflucan 150mg tab
buy ciprofloxacin п»їcipro generic
cialis priligy pharmacie online cialis achat cialis en ligne fiable ou acheter cialis 5mg
5ml latisse buy lumigan online is generic latisse as good why should you not put latisse on lower lid
erectile dysfunction medications medication for ed
https://diflucan.icu/# buy diflucan generic
pills for erection natural ed remedies
best canadian pharmacy online amoxicillin without a doctor’s prescription
neurontin 300 mg cap neurontin tablets uk
https://withoutprescription.store/# buy prescription drugs online without
erectile dysfunction drugs cures for ed
tadalafil women – order celecoxib 200mg flomax 0.4mg cost
slots capital
club pogo slots
free poker slots vodes
where can i find ivermectin for humans ivermectin tablets for humans
ed pills for sale male ed pills
order diflucan online where to buy diflucan online
https://cipro.best/# cipro ciprofloxacin
best ed pill treatment for ed
https://diflucan.icu/# how to buy diflucan
diflucan cost canada buy diflucan online india
rubyfortune
fre slots
hawk play casino
best online canadian pharmacy buy prescription drugs from india
What’s Happening i’m new to this, I stumbled upon this I have found It positively helpful and it has aided me out loads. I hope to contribute & help other users like its helped me. Great job.