ComboBOX opgave!!!

Du kan evt. lave en case i change-eventen:

Combobox2.clear

Select Case ComboBox1.list(ComboBox1.listindex)
case "Æbler"
  ComboBox2.additem "Golden Delicious"
  ComboBox2.additem "Granny Smith"
  ComboBox2.additem "Ingrid Marie"
case "Pærer"
  ComboBox2.additem "Elektriske"
  ComboBox2.additem "Heste"
  ComboBox2.additem "Frugt"

end select

OK......... men det virker ikke rigtigt???
---------------------------------------------------------------------------

Private Sub Combo1_Change()
Combo2.Clear
Select Case Combo1.List(Combo1.ListIndex)
Case "Æbler"
  Combo2.AddItem "Golden Delicious"
  Combo2.AddItem "Granny Smith"
  Combo2.AddItem "Ingrid Marie"
Case "Pærer"
  Combo2.AddItem "Elektriske"
  Combo2.AddItem "Heste"
  Combo2.AddItem "Frugt"

End Select
End Sub
---------------------------------------------------------------------------

Hvor skal den sættes ind henne af???

->DOMINO1977<-

Sorry... selvfølgelig i Combo1_Click-eventen.

NB: Change bliver kun kaldt når man skriver i text-delen af comboboxen.

IT WORKS!!!

Takker..... og lige point til dig!!!