这个是字串变16进制   
 Private Function EnCode(ByVal strString As String) As String
        Dim str As String
        Dim arrByte() As Byte
        arrByte = System.Text.Encoding.GetEncoding("GB2312").GetBytes(strString)
        For i As Integer = 0 To arrByte.Length - 1
            str += System.Convert.ToString(arrByte(i), 16)
        Next
        Return str
    End Function请问怎么还原

解决方案 »

  1.   

    Dim strString As String = "转吧使劲地转吧"
            Dim arrByte() As Byte
            arrByte = System.Text.Encoding.GetEncoding("GB2312").GetBytes(strString)
            For i As Integer = 0 To arrByte.Length - 1
                Response.Write(System.Convert.ToString(arrByte(i), 16) & "<br/>")
            Next
            Response.Write(System.Text.Encoding.GetEncoding("GB2312").GetString(arrByte))
      

  2.   

    http://community.csdn.net/Expert/topic/3971/3971806.xml?temp=.9712641可以参考