Write a Program to Read items in a Combo Box

For i=1 to Lists-1
Lists =window("regexpwndtitle:=Flight Reservation").WinComboBox("attached text:=Fly From:").GetItem(i)
msgbox lists
if (Lists = Null) Then
Exit for
End if
Next