vb6 codes unter vb 2008 express

Hallo,

ich habe hier diesen Quellcode unter vb 6 geschrieben:

open [Datei] for input as #1

do

line input #1, a

b=split(a, ";")  

c=b(0)
beschreibung=b(1)

if c="VD00654" then ...  

loop until eof(1)

Nun wollte ich, da ich zuhause vb 2008 benutze den Quellcode dort einfügen doch er erkennt den Befehl "open datei for input as #1"
weiß jemand wie ich das ungefähr in vb 08 schreiben müsste?

MfG justina

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 88604

Url: https://administrator.de/forum/vb6-codes-unter-vb-2008-express-88604.html

Ausgedruckt am: 01.05.2025 um 00:05 Uhr

1 Kommentar

Dim fr as System.IO.StreamReader = My.Computer.Filesystem.OpenTextFileReader([Datei])

do while fr.endofstream = false
dim strLine as string = fr.ReadLine()
dim strSplittedLine() as string = strLine.Split(";")  

dim c as string = strSplittedLine(0)
dim beschreibung as string = strSplittedLine(1)

if c = "VD00654 Then  
'do something  
end if

loop