我希望能够获取字符串中所有字符的ASCII值。我可以获取字符的ASCII值，但无法对整个字符串执行此操作。
我的尝试：
dim input as string = console.readline()
dim value as integer = ASC(input)
'Then I am changing its value by +1 to write the input in a secret code form.
console.writeline(CHR(value+1))
我希望能够获取字符串中所有字符的ASCII值，以便我可以更改字母中字符串+1字符中的所有字母。任何帮助表示赞赏，谢谢。
Dim asciis As Byte() = System.Text.Encoding.ASCII.GetBytes(input)
如果要增加每个字母的ascii值，可以使用以下代码：
For i As Int32 = 0 To asciis.Length - 1
asciis(i) = CByte(asciis(i) + 1)
Next
Dim result As String = System.Text.Encoding.ASCII.GetString(asciis)
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句