If Me.UltraSpellChecker1.CheckText(Me.RichTextBox1.Text).Count = 0 Then MessageBox.Show("No Spelling Errors") Else If Me.UltraSpellChecker1.CheckText(Me.RichTextBox1.Text).Count > 0 Then MessageBox.Show(Me.UltraSpellChecker1.CheckText(Me.RichTextBox1.Text).Count.ToString() + _ " Spelling Errors Found!") End If End If