For...Next Problem

[TheCrappyProgrammer]

I am trying to increment a value in a text box gradually by using a For...Next loop and a Sleep() function. However, it only increments it in one step at the end of the loop. How would I make it increment gradually?

For x = 0 to 10
lblscore.Caption = Str(Val(lblscore.Caption) + 50)
Sleep(500)
Next x

 

[StuH]

Hi.

Add a Refresh command after you update the caption. (see below).

For x = 0 to 10
lblscore.Caption = Str(Val(lblscore.Caption) + 50)
lblscore.Refresh
Sleep(500)
Next x

Stu.

 

[TheCrappyProgrammer]

Thanks