Hallo,
ich möchte, dass der Inhalt einer Richtextbox zeilenweise ausgelesen wird. Wenn z. B. in der 3. Zeile "tutorial" steht, dann soll die 3. Zeile mit Hilfe eines markierten Listbox Items ausgewählt werden (in der Listbox sind die Zeilennummern aufgelistet).
Hab es bisher mit dem Code versucht, jedoch funktioniert der ja nur bei Textdateien bzw. allgemein Dateien (hab ich am Anfang nicht bedacht -.-).
Hier mein Code:
Selbst wenn ich jetzt z. B. test.txt mit listbox2.Selecteditems ersetze, funktioniert es nicht.
Weiß jemand, wie man die Richtextbox so zeilenweise auslesen kann?
Lg,
mafiamix
ich möchte, dass der Inhalt einer Richtextbox zeilenweise ausgelesen wird. Wenn z. B. in der 3. Zeile "tutorial" steht, dann soll die 3. Zeile mit Hilfe eines markierten Listbox Items ausgewählt werden (in der Listbox sind die Zeilennummern aufgelistet).
Hab es bisher mit dem Code versucht, jedoch funktioniert der ja nur bei Textdateien bzw. allgemein Dateien (hab ich am Anfang nicht bedacht -.-).
Hier mein Code:
Code:
Dim myStreamReader As IO.StreamReader
Dim TextNachGleichheitszeichen As String
Dim TextVorGleichheitszeichen As String
Dim Einzelzeile As String
Dim test As String
myStreamReader = New IO.StreamReader("test.txt", True)
Do Until myStreamReader.EndOfStream
Einzelzeile = myStreamReader.ReadLine
Dim Position As Integer = Einzelzeile.IndexOf("=")
If Position >= 0 Then
TextVorGleichheitszeichen = Einzelzeile.Substring(0, Position)
TextNachGleichheitszeichen = Einzelzeile.Substring(Position + 1)
Else
TextVorGleichheitszeichen = Einzelzeile
TextNachGleichheitszeichen = String.Empty
End If
Select Case TextVorGleichheitszeichen
Case ListBox2.SelectedItem
test = TextNachGleichheitszeichen
Label12.Text = aktienbesitz
Case "2"
Label3.Text = test
Label7.Text = ListBox2.SelectedItem
End Select
Loop
myStreamReader.Close()Selbst wenn ich jetzt z. B. test.txt mit listbox2.Selecteditems ersetze, funktioniert es nicht.
Weiß jemand, wie man die Richtextbox so zeilenweise auslesen kann?
Lg,
mafiamix
