[Webinar] Streamline your web hosting managementRegister Today

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 184
  • Last Modified:

progress bar

id like to know how to use the progress bar with this
for i = 1 to 1000
list1.additem i
next i
i've tryed this
for i = 1 to text1.text
list1.additem i
progressbar1.value = text1.text
next i
but get an error if text1 is over 100
0
p400
Asked:
p400
1 Solution
 
DalinCommented:
Try
Dim lPercent as Integer
lPercent = Cint(i*100/cint(text1.Text))
Progressbar1.Value = lPercent
0
 
clifABBCommented:
While Dalin's answer is the preferred solution, you can just set the progress bar's Max property to whatever the highest number you will be using.

Progressbar1.Max = 1000
0
 
p400Author Commented:
got it working thanks
0

Featured Post

The new generation of project management tools

With monday.com’s project management tool, you can see what everyone on your team is working in a single glance. Its intuitive dashboards are customizable, so you can create systems that work for you.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now