我将尝试以下代码的方式:
'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
我可以识别错误。但我不知道。如何解决错误?所以有人知道问题请帮忙。