Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Schreiben in eine TEXT-Box
Autor: Beili
Datum: 27.11.01 08:49
Zum einen überlasse Windows die Auswahl der Dateinummer um mögliche Fehler auszuschließen. Das machst du so: dim DateiNr as integer DateiNr = freefile 'Eine freie Dateinummer wird von Windows zugewiesen open "c: emp\" & endpro$ for input as #DateiNr Um den gesamten Inhalt in die Textbox zu schreiben gehst du so vor: while not eof (DdateiNr) line input #DateiNr, prolinie$ text1.text = text1.text & prolinie$ 'Damit bleibt der Inhalt der Textbox erhalten und die eingelesene Zeile wird nur angehängt wend close #DateiNr Wenn du die Datei zeilenweise (wie in der Datei) in die Textbox schreiben willst änderst du die Eigenschaft 'MultiLine' der Textbox auf 'True' und änderst den Code so ab: while not eof (DdateiNr) line input #DateiNr, prolinie$ text1.text = text1.text & prolinie$ & vbnewline 'Eine neue Zeile wend close #DateiNr

Schreiben in eine TEXT-Box	40	anfaenger_michael	27.11.01 08:34
Re: Schreiben in eine TEXT-Box	37	Beili	27.11.01 08:49

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übersicht

Suchen