将字符串转换为字符代码数组

Question

我想转换像

这样的字符

Dim Str as String = **Chr(198) & Chr(233) & "ÿ¤"**

现在我想将Str转换回其字符代码。

我正在使用此代码：

Dim Bt(Str.Length - 1) As Byte
For i = 0 To Bt.Length - 1
    Bt(i) = Asc (Str(i)) ' Using the Asc() function
Next

有更好的方法吗？

Answer 1

您可以使用LINQ：

Dim bt = Str.ToCharArray().Select(Function(x) Convert.ToByte(x)).ToArray()