vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Re: Textdatei auslesen bis.... 
Autor: dbayer
Datum: 26.06.03 19:06

Versuchen wirs mal so

SUCH="BLABLA"
F=freefile
Open "Bla.txt" for input as #f
Do
line input,#f,txt
if instr(txt,such) then exit do
'Hier in die listbox etc
Loop until eof(f)
close#f

oder in Version2

SUCH="BLABLA"
Fund=false
F=freefile
Open "Bla.txt" for input as #f
Do
line input,#f,txt
if instr(txt,such) >0 then Fund=true
If Fund=True then
'Hier in die listbox etc
End if
Loop until eof(f)
close#f

dbayerTo be is to do (Rene Descartes)To do is to be (Kant / Nietzsche / Sartre u.a.)Do be do be dooo (Frank Sinatra, Strangers in the Night)

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Textdatei auslesen bis....139Resoucer26.06.03 18:20
Re: Textdatei auslesen bis....345dbayer26.06.03 19:06
Re: Textdatei auslesen bis....532Dietmar26.06.03 20:47

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel