skriv til fil

får følgende fejlmeddelelse:

Object reference not set to an instance of an object.

har følgende kode:
Public Function writetofile(ByVal tekst As String)
            Dim oFile As System.IO.File
            Dim oWrite As System.IO.StreamWriter
            Dim oRead As System.IO.StreamReader

            'Opret fil
            'oWrite = oFile.CreateText("C:\tables.htm")
            'OpenText()

            'Open fil
            oRead = oFile.OpenText("C:\test\tables.htm")


            'skriv til fil
            oWrite.WriteLine(tekst)
            'oWrite.WriteLine()        'Write a blank line to the file

            'oWrite.Close()
        End Function

kalder metoden såden:

writetofile(string)

hvad gør jeg forkert