数据转换问题
Dim var(1) As Byte
Dim v() As Byte
Dim i As Integer
Dim uni As New System.Text.UnicodeEncoding
Dim utf8 As New System.Text.UTF8Encoding
var(0) = 248
var(1) = 8
'var(2) = 130
Te.Text = System.Text.UnicodeEncoding.UTF8.GetString(var)
v = System.Text.UnicodeEncoding.UTF8.GetBytes(Te.Text)
Tt.Text = System.Text.ASCIIEncoding.Default.ToString
Tx.Text = " "
For i = LBound(v) To UBound(v)
Tx.Text = Tx.Text & Hex(v(i)) & " "
Next
当Byte值大于127时就无法转换，而换成
Te.Text = System.Text.UnicodeEncoding.Default.GetString(var)
v = System.Text.UnicodeEncoding.Default.GetBytes(Te.Text)
Tt.Text = System.Text.ASCIIEncoding.Default.ToString
时，如上所示的数据时就转换错误
谢谢了
[解决办法]
你可以用convert.tobase64string和convert.frombasestring试试
