Visual Basic - Problemas INSERT INTO

Tengo un problema al hacer una insert, paso a comentaro.

necesito meter en la base de datos ' (comilla simple) y no puedo ya que la interpreta como inicio/fin de cadena de txt, con lo cual me que sin poder hacer la insert. que puedo hacer

Ejemplo:
quiero insertar esto:
Select * from cllientes where nombre ='juan'

en una tabla que se llama consultas con los campos NomSQL y SQL:
la Insert que deberia de hacer es esta:

INSERT INTO Consultas (NonSQL,SQL) VALUES ('CONSULTA1','Select * from cllientes where nombre ='juan')

pero como los datos CONSULTA1, Select * from cllientes where nombre ='juan'

los cojo tal cual de un form pues lo que me queda al generar la cadena SQL es:
INSERT INTO Consultas (NonSQL,SQL) VALUES ('CONSULTA1','Select * from cllientes where nombre ='juan'')

lo cual como es normal da error de que esta mal construida la sentencia SQL

Que pouedo hacer

Coloca en vez de un apostrofe, dos o concatena usando comillas, seria algo como:

sSQL = "INSERT INTO Consultas (NonSQL,SQL) VALUES ('CONSULTA1','Select * from cllientes where nombre ='" & "'juan'" & "'")