ayuda a llenar dropdownlist !!

[rockex]

saludos foreros

les escribo para pedirles una ayuda en mi problema
que consta en un ciclo for el cual utilizo para llenar un dropdownlist.
Cuento corto el dropdownlist lo tengo que llenar con una lista de horas

ejemplo :

00:00
00:30
01:00
01:30
02:00
02:30
..
hasta
..
23:00
23:30

la cosa es que lo tengo que llenar con un for pero no me ha resultado T_T.
este es mi codigo en donde cbxHora es el DropDownList .


Dim i As Integer
Dim horas1, horas2, minutos1, minutos2 As Integer
Dim final, final2 As String
horas1 = 0
horas2 = 1
minutos1 = 0
minutos2 = 30

For i = 0 To 23

final = (horas1 + i & ":" & minutos1)
final2 = (horas2 + i & ":" & minutos2)

cbxHora.Items.Insert(0 + i, New ListItem(final, "i"))
cbxHora.Items.Insert(1 + i, New ListItem(final2, "i"))


Next

Espero me puedan ayudar.
gracias.