vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 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: Problem beim Einlesen von Daten 
Autor: Datenfuchs
Datum: 28.04.04 10:32
Hi Adrian,

das Problem liegt in der Input-Anweisung. 
Input #1, strX, strY
Damit liest du eine Zeile in strX und dann die nächste in strY ohne dazwischen zu prüfen ob das Dateiende erreicht ist.

Dein Programm funktioniert demnach nur wenn du eine gerade Anzahl von Zeilen in der Textdatei hast, da nur nach jeder zweiten Zeile auf EOF geprüft wird.

Versuchs mal ungefähr so: 


Do Until EOF(1)
 
    Input #1, strX
 
    If not EOF(1) then
 
          Input #1, strY
 
          Set lstItem = ListView1.ListItems.Add(, , strX)
          lstItem.SubItems(1) = strY
 
    End If
 
Loop
Hoffe dein Prob ist damit gelöst

MfG

Datenfuchs
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Problem beim Einlesen von Daten424Adrian127.04.04 20:51
Re: Problem beim Einlesen von Daten218Adrian127.04.04 20:59
Re: Problem beim Einlesen von Daten248Datenfuchs28.04.04 10:32

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