convertir de array bytes a string

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim ISO88591 As System.Text.Encoding = System.Text.Encoding.GetEncoding("ISO-8859-1")
        Dim str As String = "áéíóú@Æ cajón afecto"
        Dim isoBytes() As Byte = ISO88591.GetBytes(str)
        Dim x As String = ISO88591.GetString(isoBytes)
        Dim p As String = ""

       x = ISO88591.GetString(isoBytes, 0, isoBytes.Length)

    End Sub

fuente

String cabecera xml

Dim header As String = "<?xml version=""1.0"" encoding=""UTF-8""?>"
Dim ISO8859 As String = "<?xml version=""1.0"" encoding=""ISO-8859-1""?>"


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim nombre_xml As String = "archivo.xml"
        'Dim root As String = "<DATA></DATA>"
        Dim xml As New XmlDocument
        Dim node As XmlNode = xml.CreateXmlDeclaration("1.0", "UTF-8", Nothing)
        xml.InnerXml = node.OuterXml & "<data><conex></conex><creacion>" & Now.ToString("yyyy-MM-ddTHH:mm:ss") & "</creacion><actualizacion></actualizacion></data>"

        Dim settings As New XmlWriterSettings
        settings.Indent = True
        Dim out As XmlWriter = XmlWriter.Create(nombre_xml, settings)
        xml.Save(out)
        out.Close()
        'xml.Save(nombre_xml)
        MessageBox.Show("fin!")

    End Sub

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))