miércoles, 6 de marzo de 2019

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

No hay comentarios.:

Publicar un comentario