Visual Basic - Problemas con el caracter '

Hola, necesito que alguien me ayude con este caracter especial ' es decir con la comilla simple, porque cuando trato de hacer el insert o el update, algunos campos tienen esta comilla entre medio de su contenido y me da problemas, como puedo controlarla?

de antemano gracias

Reemplazalo por dos veces el mismo caracter y se insertará sin problemas:

strSQL = Replace(strSQL,"'","''")