✔ Das letzte Element

[MacInternet]

Hallöchen,

und schon wieder hab ich ein Problem, das ich leider bislang noch nicht lösen konnte.

Und zwar soll der Inhalt des letzten Elements einer Listbox ermittelt werden, die eine Textdatei einliest. Das Problem: es ist keineswegs das letzte Element der Datei, da die Listbox sortiert ist.

Wie kann ich denn das letzte Element einer Listbox ermitteln, wenn die Reihenfolge nicht mit der gespeicherten Datei zusammenhängt? Klar, ich könnte die Datei zuerst sortieren, aber das dauert zu lange. Ich möchte auf schnellstem Weg ermitteln, wie das letzte angezeigte Element einer sortierten Listbox heißt. Möglichst, ohne erst die (riesige) Datei komplett zu durchlaufen. Oder wenigstens nur ein einziges Mal...

Kann mir da bitte jemand helfen?

Danke schon mal im voraus,
Mac

 

[ronaldh]

Ganz einfach:

Private Function LetztesElement() As String
   With List1
      If .ListCount > 0 Then
         .ListIndex = .ListCount - 1
         LetztesElement = .Text
      End If
   End With
End Function

Viele Grüsse
ronaldh

 

[MacInternet]

Oh, klasse, danke! So kann ich den letzten Eintrag ermitteln und brauche jetzt nur noch das Schlüsselwort rauszufiltern!

*freu*

Gruß Mac