Cómo: Escribir texto en archivos en Visual Basic

Para escribir texto en un archivo.

• Utilice el método WriteAllText para escribir el texto en un archivo, especificando el archivo y el texto que se va a escribir. Este ejemplo escribe la línea "This is new text." en el archivo llamado test.txt, anexando el texto al texto existente en el archivo.
  
  VB

  My.Computer.FileSystem.WriteAllText("C:\TestFolder1\test.txt",
  "This is new text to be added.",True)
  
  
  

Para escribir una serie de cadenas en un archivo

• Recorra en iteración la colección de cadenas. Utilice el método WriteAllText para escribir el texto en un archivo, especificando el archivo de destino, la cadena que se debe agregar y estableciendo append en True.
  
  Este ejemplo escribe los nombres de los archivos contenidos en el directorio Documents and Settings en el archivo FileList.txt, insertando un retorno de carro entre cada uno de ellos para una mejor legibilidad.
  VB

  For Each foundFile As String In
  My.Computer.FileSystem.GetFiles("C:\Documents and Settings")
  foundFile = foundFile & vbCrLf
  My.Computer.FileSystem.WriteAllText(
    "C:\Documents and Settings\FileList.txt", foundFile, True)
  Next