list box not show individual entries

I have a little script:
Private Sub Command1_Click()
pausetime = 3
For i = 1 To 5
start = Timer ' Set start time.
Do While Timer < start + pausetime
j = 5
Loop
List1.AddItem start
Next
End Sub

The start time does not show up in list1 until the entire 'for' loop has been executed.  Why doesn't it add the time to list1 on each iteration of the for loop?

donb1Asked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

VbmasterCommented:
The List1 doesn't get any time to do a update. Place a DoEvents after List1.Additem start and the List1 will get time to update.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
steve06Commented:
You should add the command DoEvents in your loop, instead of the line "j=5". This way, VB will let other windows events occur, and your listbox will be loaded.
0
donb1Author Commented:
setve06 is also a good idea
Thanks
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic Classic

From novice to tech pro — start learning today.