vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevAniGif - als kostenlose Vollversion auf unserer vb@rchiv CD Vol.5  
 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

Visual-Basic Einsteiger
Re: Textdateien 
Autor: Brandy
Datum: 02.10.03 11:20

Hallo suter,

das Einlesen klappt bei Dir nicht, weil Du mit der Input-Funktion von vorneherein nur das erste Zeichen einliest.

Probiers mal damit:
Dim Zeichen As String
 
Open "C:\DATEI1.txt" For Input As #1   ' Datei öffnen.
Do While Not EOF(1)   ' Schleife bis Dateiende.
   Zeichen = Input(1, #1)   ' Ein Zeichen lesen.
   Me.Text1.Text = Me.Text1.Text & Zeichen 'Ausgabe in einer Textbox
Loop
Close #1   ' Datei schließen.
Diesen Code kannst Du z.B. einer Befehlsschaltfläche zuordnen.
Vergiß aber nicht, daß Du zum Ausprobieren ein Textfeld mit dem Namen "Text1" benötigst.

Gruß Brandy
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Textdateien628suter02.10.03 10:59
Re: Textdateien404Brandy02.10.03 11:20
Re: Textdateien398suter02.10.03 12:53
Edit363suter02.10.03 12:55
Edit 2386suter02.10.03 13:21
Re: Edit356RalfH02.10.03 13:23
Re: Edit344suter02.10.03 13:38
Re: Edit365RalfH02.10.03 14:25
Re: Edit374RalfH02.10.03 14:38
Re: Edit362suter02.10.03 14:40
Re: Edit356RalfH02.10.03 14:51
Re: Edit362suter02.10.03 15:24
Re: Edit418Nitro03.10.03 00:29

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