ListBox : Hele tiden se nederste element!!!

Brug følgende kode, evt lige efter et nyt element er tilføjet:
-Det antages at listboxen hedder List1:

Dim a
a = List1.ListCount - 1
List1.ListIndex = a

Du kan evt tilføje denne linie også:
List1.ListIndex = -1    \'Fjerner markering

/tjacob

Det spiller MAX - Tak for det hurtige svar :-)