Using fs As New FileStream("C:\Test\test.txt", FileMode.OpenOrCreate, _
                 FileAccess.Write, _
                 FileShare.None)
            Using writer As New StreamWriter(fs)

 If My.Computer.FileSystem.DirectoryExists("C:\Test") = False Then
            My.Computer.FileSystem.CreateDirectory("C:\Test")
        End If