PERCENTAGE in label....

[luca90]

I have myvar=45878 and a loop for next

during the for next i increase a counter count=count+1

how to insert in labe the value of percentage based the counter in %

in effect:

when count = myvar the percentage is 100%

hope i am clear

[deathfxu]

Label1.Caption = Trim$(CStr(CInt((count / myvar) * 100))) & "%"

Enjoy!

[opus]

Put a Lobel on your form named "NewLabel"

'in you Loop
NewLabel.Caption=CStr((count/myvar)*100) & "%"

[edit] Late as usual

[TysonLPrice]

Maybe?

lblTest.Caption = Int(count * 100 / myvar) & " % Completed"

[TysonLPrice]

Man you guys are fast :-)

[deathfxu]

Great minds think alike

[luca90]

Label1.Caption = Trim$(CStr(CInt((count / myvar) * 100))) & "%"

Enjoy!

tks to the all!!!!!

the babel show the value of increase during the loop....
only if i insert doevents....
existis other method?

I have see the doevets statement slow the loop, or not?

[Hack]

Without the Doevents you wouldn't see anything until it was all over.

[deathfxu]

Agree w/ Hack.

Also, check out the "Improved DoEvents" link in my sig.

[si_the_geek]

You don't need to use DoEvents (which refreshes all controls, allows events to fire, etc), you can get the same effect by just refreshing the particular control(s) you want, eg:

Label1.Caption = Trim$(CStr(CInt((count / myvar) * 100))) & "%" 
Label1.Refresh