استفاده از تایمر در پرکردن رکودهای vsflex از database

[kama2222]

می خواهم با فاصله زمانی دو ثانیه به دو ثانیه رکودهای vsflex را از بانک به صورت رکورد به رکورد فراخوانی کند.
یعنی ابتدا رکورد اول بعد از 2 ثانیه رکورد دوم و بعد از 2ثانیه رکورد سوم و تا آخرین رکورد نمایش داده شوند.تا جدول من پر شود از کل اطلاعات database.

[mpmsoft]

یک رکوردست بصورت Private در فرم بساز و بازش کن


Private Sub Timer1_Timer()
If Rs.Eof Then Timer1.Enabled= False : Exit Sub

Rs.MoveNext
Vs.AddItem rs("f1") & VbTab & Rs("f2")
End Sub

[kama2222]

خیلی متشکرم