Rubrik: TextBox, ListBox & ComboBox | 01.04.02 |
Zeilen einer RTFBox ermitteln (Split-Funktion) VB-Version: VB5, VB6 | ||
Views: 7.807 |
Die Gesamtanzahl der Zeilen einer RTFBox oder auch einer MultiLine-TextBox können Sie mit der Split-Funktion ermitteln. Hier ein Beispiel anhand einer RTFBox:
Dim sLines() As String sLines = Split(RichTextBox1.Text, vbCrLf) MsgBox "Zeile1: " & sLines(0) MsgBox "Zeile2: " & sLines(1) ... MsgBox "Letzte Zeile: " & sLines(UBound(sLines))
Die Split-Funktion zerlegt einen String an einem vorgegebenen Trennzeichen (hier: Zeilenschaltung = vbCrLf) in Teilstrings. Diese Funktion gibt es allerdings erst ab Visual Basic 6. Für alle, die mit einer früheren Version von Visual Basic arbeiten, hier der Link zu unserem Tipp Split-Funktion für VB4/5.