Exemplo de escrita em um arquivo texto:

Public Shared Sub Main()
' Cria uma instância de um StreamWriter para escrever para um arquivo
Using sw As StreamWriter = New StreamWriter("Macoratti.txt")
' Inclui algum texto
sw.Write("Este é um teste")
sw.WriteLine("-------------------")
' Outros objetos podem ser escritos no arquivo
sw.Write("Data : ")
sw.WriteLine(DateTime.Now)
sw.Close()
End Using
End Sub