Hallo Zusammen : ))
ich möchte gerne in einer textdatei nachprüfen:
wenn in einer Zeile der txt1.text steht, soll er dann in das textfeld txt2.text den 2. wert nach ;(Strich-punkt) reinschrieben.
In diesem Code kann ich in der textdatei txt1 nachprüfen, wenn er am Anfang der Zeile von der textdatei steht.
Ich habe versucht, den sZeile.StartWith den StarthWith mit den Werten, die er mir anbietet umzusetzen. Aber hier bringt er mir nur Fehler.
Wie kann man diesen Code abändern, der er das tut, was ich möchte : )?
Dim Data As String
Data = "C:\temp\data.csv"
Try
Dim FiStr As FileStream = New FileStream(Data, FileMode.Open) 'lesen
Dim StrRe As StreamReader = New StreamReader(FiStr)
Dim sZeile As String
Dim sZeilenArray() As String
Do Until StrRe.Peek() = -1
sZeile = StrRe.ReadLine
sZeilenArray = sZeile.Split(CChar(";"))
If sZeile.StartsWith(txt1.Text) Then
sZeilenArray = sZeile.Split(CChar(";"))
txt2.Text = sZeilenArray(1)
End If
Loop
StrRe.Close()
Catch except As Exception
MsgBox(except.Message & vbNewLine & _
"Erstellen Sie zunächst mit <Anfügen> oder <Überschreiben> die Datei", MsgBoxStyle.Exclamation)
End Try
Der Code ist für vb.net2003
Danke sehr für Eure Unterstützung.
------------------
Schöne Grüße
Feyza : )
[Diese Nachricht wurde von Feyza am 30. Okt. 2008 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP