Visual Basic - Error guardando registro

Estoy guardando registros en una tabla y el primero me lo salva bien y el segundo me saca el siguiente error:

No coinciden los tipos de datos en la expresion de criterios,

me muestra el error en la línea que tengo:

rs1.Open , cn1

yo te recomiendo q si estas haciendo INSERT en la BD mejor utiliza el metodo Execute de la conexion. Es decir: cn1.execute "query"

si no quieres hacerlo asi, entonces necesitas checar q estas enviando exactamente en cada insercion.

saludos