A Much Faster Way To Do This?

[omarswan]

Hi,
I'm trying to load some Time data inside
ComboBox.

Example:
01:00 to 12:59

here is the code that I've used so far.

Dim Cnt1 as byte
Dim Cnt2 as byte

Combo1.Clear
 For Cnt1 = 1 To 12
  For Cnt2 = 0 To 59
   Combo1.AddItem Format$(Str$(Cnt1), "00") & ":" & _
     Format$(Str$(Cnt2), "00")
  Next Cnt2
 Next Cnt1

This method works, but it works very slow
Any suggestions ??