Encoding

Dim enc As Encoding = Encoding.GetEncoding("ISO-8859-1")
Encoding.GetEncoding("ISO-8859-1")

System.Text.Encoding.GetEncoding(&H6FAF)

System.IO.File.WriteAllLines("archivo.txt", txt.ToArray, System.Text.Encoding.GetEncoding(1252))