28. März 2024, 18:16
VB-fun.de - Beitragsübersicht zum VB-/VBA-Forum-Archiv 0414
  VB6: Zeile in Textdatei ergänzen
 Von bla
 Am 19. November 2008 um 16:09:54
 Frage hi,

meine frage:
ich hab eine textdatei mit allen daten (1. Januar, 2. Januar ... 31. Dezember).
jedes datum steht in einer neuen zeile.

wie kann ich nun den text nach einem datum durchsuchen und dann in der zeile darunter einen text schreiben?

Beispiel:
5. März
6. März
Geburtstag
7. März

ich bin jetzt soweit:
Dim F As Integer
Dim Zeile As String

F = FreeFile
Open "C:\txt.txt" For Input As #F
Do While Not EOF(F)
' Zeile lesen
Line Input #F, Zeile

If Zeile = "6. März" Then
'unter dieser Zeile etwas neues hinschreiben
End If
Loop
Close #F
das klappt natürlich nicht, zumal schon der öffnungsmodus falsch ist.
wie kann ich dieses verfahren nun bewerkstelligen?
[ VB-/VBA-Forum | Archiv 0414 | Archiv-Übersicht ]
 Antworten
VB6: Zeile in Textdatei ergänzen - bla 19. November 2008 um 16:09:54
Re: Zeile in Textdatei ergänzen - LotharK 21. November 2008 um 09:24:25
Re: Zeile in Textdatei ergänzen - bla 21. November 2008 um 16:34:11
Re: Zeile in Textdatei ergänzen - r.mueller@sz-online.de 21. November 2008 um 18:31:02

Zum Seitenanfang

Startseite | VB-/VBA-Tipps | Projekte | Tutorials | API-Referenz | Komponenten | Bücherecke | Gewinnspiele | VB-/VBA-Forum | DirectX | DirectX-Forum | VB.Net | VB.Net-Forum | Chat | Spielplatz | Links | Suchen | Stichwortverzeichnis | Feedback | Impressum