Looping the time

[lotus18]

Hi,

Try this :
[code=vb]
Combo1.Clear
Dim t As Date
Dim i As Integer
t = CDate("07:00:00 ")
Do
t = DateAdd("n", 30, t)
Combo1.AddItem Format(t, "hh:mm AM/PM")
i = i + 1
Loop Until i >= 26

[/code]

Regards
Veena

Hi Veena

I just want to say THANK YOU VERY MUCH. Atlast! I've got what I wanted to know ;)

[jamesd0142]

ye this just demonstrates how much i have to learn :)