Visual Basic para Aplicaciones - Ayuda con un error que no se como resolver

Lo que pasa es que tengo mi base de datos en access ya estan definidos los campos claves en cada una de mis tablas (Alumnos y Escuela) que ocupo pero el problema es en mis claves que son del tipo TEXTO (esto es en la tabla de Escuela), si porque hago mi formulario en visual basic6.0 pero al hacer referencia a todos los campos que son de tipo texto (en la base de datos de access) desde VB me marca un error en la instruccion SQL descrita en VB me sale el siguiente error:

ERRORR 3061EN TIEMPO DE EJECUCION
Pocos parametros. Se esperaba 1.

Este error me lo pone a la hora de querer insertar un nuevo registro(hacer una alta), borrar un registro(hacer una BAJA) o para querer hacer una consulta de registros obviamente que es solo cuando mi campo clave es de tipo texto (refiriendonos a la base de datos de access). Con los campos que son te tipo Numerico no hay ningun problema.

*****************************************************
Me recomendo una persona que le pusiera en la parte del Where apostrofes al objeto asi:
.
.
.
s = "select * "
f = "from Escuela "
w = " where (Clave_esc = ' " & resp & " ' ) ;"
sql = s & f & w
Set reg = BD.OpenRecordset(sql)
.
.
.
El error lo marca precisamente en la instruccion SQL que aparece en verde si no le pongo los apostrofes. y si le pongo los apostrofres ocurre lo siguiente:

********************************************************
lo hice y no me marca error si me acepta almacenar el registro pero en el campo clave me almacena un numero cero en los demas campos de mi registro si me almacena los datos y si sigo dando de alta desde el pr

Prueba a sustituir las lineas

s = \"select * \"
f = \"from Escuela \"
w = \" where (Clave_esc = \' \" & resp & \" \' ) ;\"
sql = s & f & w

por la siguiente

sql = "SELECT * FROM escuela where Clave_esc = ' " & resp & "' "

Con eso te deberia funcionar siempre que luego, durante el proceso no cambies el valor del campo Clave_esc en ningun registro