Use the OpenStandardOutput method. : StreamWriter « Stream File « VB.Net Tutorial

Imports System.IO

Public Class InsertTabs
   Private Const tabSize As Integer = 4

   Public Shared Function Main(args() As String) As Integer
      Dim writer As StreamWriter = Nothing
      writer = New StreamWriter("output.txt")
      ' Redirect standard output from the console to the output file.
      Console.SetOut(writer)
      ' Redirect standard input from the console to the input file.
      Console.SetIn(New StreamReader("input.txt"))

      Dim line As String = "this is a test"
      Dim newLine As String = line.Replace("".PadRight(tabSize, " "c), ControlChars.Tab)
      Console.WriteLine(newLine)
      writer.Close()
      ' Recover the standard output stream
      Dim standardOutput As New StreamWriter(Console.OpenStandardOutput())
      standardOutput.AutoFlush = True
      Console.SetOut(standardOutput)
      Return 0
   End Function 
End Class

13.19.StreamWriter
	13.19.1.	Create StreamWriter from FileStream
	13.19.2.	Use StreamWriter and StreamReader to deal with text file
	13.19.3.	Save various data types to a text file
	13.19.4.	Log file with StreamWriter and StreamReader
	13.19.5.	Use WriteAllLines to write text to a file
	13.19.6.	Redirect standard output from the console to the output file
	13.19.7.	Recover the standard output stream so that a completion message can be displayed.
	13.19.8.	Use the OpenStandardOutput method.