' Listing 13.3 13LIST03.TXT  --- Inicjalizacja listy rozwijalnej

Private Sub Form_Load()
  Combo1.AddItem "Chicago"
  Combo1.AddItem "Dallas"
  Combo1.AddItem "Seattle"
  Combo1.AddItem "Washington"
  Combo1.AddItem "Houston"
  Combo1.AddItem "Dayton"
End Sub
