5.2 Textdateien lesen und schreiben  
Sollte die Datei noch nicht angelegt sein, dann wird sie erzeugt. Sie wird vom _
  Objekt »StreamWriter« erzeugt. Es wird zu Beginn der Prozedur deklariert:
 
Dim objDateiMacher As System.IO.StreamWriter
Da diese Kaskade System.IO noch mehrmals verwendet wird, wird zu Beginn, das _
  heißt vor dem Befehl 
 
Public Class
der Befehl eingefügt, mit dem auf diese Klasse zugegriffen werden kann:
 
Imports System.IO
Nun kann die Prüfung auf File.Exists und die Deklaration verkürzt werden auf:
 
Dim objDateiMacher As StreamWriter
Und mit diesem Objekt kann eine Textdatei erzeugt werden:
 
objDateiMacher = New StreamWriter(strWinVerz & "\" & _
DATEINAME)
objDateiMacher.Close()
objDateiMacher = Nothing
Soll ein Text in der Datei stehen, dann könnte er mit dem Befehl
 
objDateiMacher.Write("C:\Eigene Dateien\Statistik.xls")
zwischen New und Close eingefügt werden.
 
Wenn die Datei »info.txt« existiert, dann kann ihr Inhalt ausgelesen werden. _
  Dabei hilft das Objekt »StreamReader«. Es wird analog zu »StreamWriter« _
  deklariert:
 
Dim objDateiLeser As StreamReader
Nun kann gelesen werden:
 
...
Else
   objDateiLeser = New StreamReader(strWinVerz & "\" & _
   DATEINAME)
   strExcelDateiname = objDateiLeser.ReadToEnd()
   objDateiLeser.Close()
   objDateiLeser = Nothing
End If
:::::::::::::::usw

Public Class
der Befehl eingefügt, mit dem auf diese Klasse zugegriffen werden kann:
Imports System.IO
Nun kann die Prüfung auf File.Exists und die Deklaration verkürzt werden auf:

Imports System.IO
Public Class

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