-1

我将尝试以下代码的方式:

'Click on Button1 spell checks Text1 textbox
Dim strResultText As String
Dim sc As New SpellChecker
sc.OpenDictionary "c:\SpellUS.lex"
Private Sub Button1_Click()
    TextBox1.Focus()

    strResultText = sc.CheckText(TextBox1.Text, ExitStatus)
    TextBox1.Text = strResultText
End Sub

但是上面的代码是错误的。1. 拼写检查器 2.ExitStatus

我可以识别错误。但我不知道。如何解决错误?所以有人知道问题请帮忙。

4

1 回答 1

1

我想检查 ExitStatus 会给你一个关于错误的线索(如果有的话)

于 2009-09-18T12:32:53.920 回答