' ===============================================
' Beispiel für die "alten" Dateizugriffsmethoden
' Visual Basic.NET Kompendium, Markt&Technik
' ===============================================
Imports Microsoft.VisualBasic
Imports System.Console
 
Class App
 
   Shared Sub Main ()
      Dim DateiNr As Integer
      Dim Inhalt As String
      DateiNr = FreeFile()
      FileOpen(DateiNr, "C:\Msdos.sys", OpenMode.Input)
      Inhalt = InputString(DateiNr, LOF(DateiNr))
      WriteLine(Inhalt)
      FileClose(DateiNr)
   End Sub
 
End Class

blutiger anf?nger
ich weiss was ich will
aber eben nicht wie es geht