Stream File VB.Net Tutorial

Imports System.IO
Public Class InsertTabs
   Public Shared Function Main(args() As String) As Integer
      Dim writer As StreamWriter = Nothing
      writer = New StreamWriter(args(1))
      Console.SetOut(writer)
      Console.SetIn(New StreamReader(args(0)))
      Console.WriteLine("this is a test")
      writer.Close()
      
      Dim standardOutput As New StreamWriter(Console.OpenStandardOutput())
      standardOutput.AutoFlush = True
      Console.SetOut(standardOutput)
      Return 0
   End Function 
End Class