Code Fehler

Code:

Private Sub PictureBox4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox4.Click
    Dim vat
    vat = Application.StartupPath
    Dim dat
    dat = dat & "\testordner\text1.txt"
    MsgBox(dat)
    Using sw As StreamWriter = New StreamWriter(dat)
        ' schreibe text
        sw.Write("test")
        sw.Close()
    End Using

End Sub

Als Fehler zeigt er mir Fehler 1
Fehler bei der �berladungsaufl�sung, da keine zugreifbare "New" ohne einschr�nkende Konvertierung aufgerufen werden kann:
'Public Sub New(path As String)': Der mit dem Argument �bereinstimmende Parameter "path" wird von "Object" auf "String" reduziert.
'Public Sub New(stream As System.IO.Stream)': Der mit dem Argument �bereinstimmende Parameter "stream" wird von "Object" auf "System.IO.Stream" reduziert.

Normal mit normalem Pfad funktioniert auch. Nur wie krieg ich die Variable da rein, damit es eine unter geordnete Datei �ffnet und bearbeitet?