Hi.
I'm trying to make a form with a listbox, which has to be populatede, repeatedly...
I've tryied with a delay function I found, but, all it does, is to hang my app.. This is my code so far.. :
[tt]Public Sub Delay(lngSeconds As Long)
Dim lngStart As Long
lngStart = Timer
Do While Timer <= intStart + lngSeconds
DoEvents
Loop
End Sub
[/tt]
And then in a function called ListSager i end it with
Sub ListSager()
' code to puopulate listbox, - IT works.
Delay(5)
ListSager
End Sub
I don't get any error msg.. It just hangs VB6 and i have to kill it. :-(
Anyone who can see what I'm doing wrong? Or links to something that works?
Anyway, I'll keep on trying..
Cheers
Machine code Rocks
I'm trying to make a form with a listbox, which has to be populatede, repeatedly...
I've tryied with a delay function I found, but, all it does, is to hang my app.. This is my code so far.. :
[tt]Public Sub Delay(lngSeconds As Long)
Dim lngStart As Long
lngStart = Timer
Do While Timer <= intStart + lngSeconds
DoEvents
Loop
End Sub
[/tt]
And then in a function called ListSager i end it with
Sub ListSager()
' code to puopulate listbox, - IT works.
Delay(5)
ListSager
End Sub
I don't get any error msg.. It just hangs VB6 and i have to kill it. :-(
Anyone who can see what I'm doing wrong? Or links to something that works?
Anyway, I'll keep on trying..
Cheers
Machine code Rocks