Visual Basic - Problema con recordset

Estoy utilizando BD access 2000, existe un campo codigo y tiene como informacion Nelson´s, al momento de hacer un query de la siguiente forma:
dataset = " select codigo,des from tabla where codigo=`" & text1 & "'"
me genera un error y se sale porque el dato del codigo tiene un apostrofe.

Gracias por la ayuda que me puedan prestar.

proba asi:

dataset = " select codigo,des from tabla where codigo=" & chr(34) & text1 & chr(34)