>我有一小段代码可以将字符串转换为 Int32
Dim sample As String = "H۩llo!"
For Each c As Char In sample
Dim enc As String = Convert.ToInt32(c)
Console.Write(enc + " ")
Next
Console.ReadKey()
这会将文本转换为 Int32输出:
72 1769 108 108 111 33
但是有没有办法将输出转换回"H۩llo!"?
您可以使用以下命令将其转换回原始字符串
Dim nums As Int32() = { 72, 1769, 108, 108, 111, 33 }
Dim cs As Char() = nums.Select(Function(x) Microsoft.VisualBasic.ChrW(x)).ToArray()
Dim s = New String(cs)
Console.OutputEncoding = System.Text.Encoding.UTF8
Console.WriteLine(s)