Я попробую путь следующего кода:
'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
Я могу определить ошибку. Но я не знаю. Как исправить ошибку?