1. Liebe Forumsgemeinde,

    aufgrund der Bestimmungen, die sich aus der DSGVO ergeben, müssten umfangreiche Anpassungen am Forum vorgenommen werden, die sich für uns nicht wirtschaftlich abbilden lassen. Daher haben wir uns entschlossen, das Forum in seiner aktuellen Form zu archivieren und online bereit zu stellen, jedoch keine Neuanmeldungen oder neuen Kommentare mehr zuzulassen. So ist sichergestellt, dass das gesammelte Wissen nicht verloren geht, und wir die Seite dennoch DSGVO-konform zur Verfügung stellen können.
    Dies wird in den nächsten Tagen umgesetzt.

    Ich danke allen, die sich in den letzten Jahren für Hilfesuchende und auch für das Forum selbst engagiert haben. Ich bin weiterhin für euch erreichbar unter tti(bei)pcwelt.de.
    Dismiss Notice

VB6 Zeilen auslesen

Discussion in 'Programmieren' started by ViP@r, Sep 13, 2005.

Thread Status:
Not open for further replies.
  1. ViP@r

    ViP@r Byte

    Ich hab mal ne Frage:
    Wie kann man bei VB6 aus einer Datei eine bestimmte Zeile auslesen???

    Gruß
    Viper
     
    ViP@r, Sep 13, 2005
    #1
  2. Leppi

    Leppi ROM

    Ich würde das mit dieser Funktion realisieren:
    Code:
    function GetZeile(zeilennummer as integer)

dim strZeile as string
dim i as integer

Kanal = Freefile
open "F:\Testtext.txt" for Input as Kanal
   do while EOF(Kanal)
      Line Input #Kanal, strZeile

      if i = zeilennummer then
         exit loop
      end if

      i = i + 1
   loop
close Kanal

GetZeile = strZeile
end function
    Hoffe du meintest sowas, hast dich ja relativ kurz in deinen ausführungen gehalten ;)
     
    Leppi, Sep 14, 2005
    #2
Thread Status:
Not open for further replies.

Share This Page