Question

我在加密程序中使用以下代码：

If File.Exists(filebox.Text) Then
    Dim text As String = File.ReadAllText(filebox.Text)
    Dim chars() As Char = text.ToCharArray
    Dim ascii(chars.Length - 1) As Integer
    For i = 0 To chars.Length - 1
        chars(i) = Chr(Asc(chars(i)) + 3 * 2)
    Next
    text = chars.ToString
    File.WriteAllText(filebox.Text, text)
    output("success")
Else
    output("file does not exist or is open")
End If

但是，当我检查完文本文件后，我看到的只有：

System.Char []

如何让它显示其他文字？

Answer 1

更改

text = chars.ToString

要

text = New String(chars)

chars是一个数组，您正在该数组上执行ToString 但是，您可以创建一个New String，将char数组作为参数。

String(char[])文档。

如何在字符和字符串之间切换

1 个答案: