我正在尝试创建一个文本到语音程序的历史记录，并且该程序在使用我使用的代码时出错

Question

好的，让我先说这里是使用的代码：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim SAPI
    SAPI = CreateObject("SAPI.spvoice")
    SAPI.Speak(RichTextBox1.Text)
    My.Settings.History.Add(RichTextBox1.Text.ToString)
End Sub

然后我开始申请。 但是我点击了Button1，我得到了这个：

没有历史代码就可以了。也许有更好的方法来做到这一点。 请帮忙。

Answer 1

那是因为你的设置保存错误了。见下面的例子......

更改并保存设置

 My.Settings.History = RichTextBox1.Text
 My.Settings.Save()