数据转换有关问题

数据转换问题
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试试