I write this function

Public Function CheckWord(RTFName As RichTextBox)
.
.
.
.
end Function

when I call it from a form like this :

call CheckWord (RichTextBox1)

I got an error "Type mismatch" on the line in the form
what goes wrong ?

Thanks
Gil