Basic - No coinciden los tipos

Hola que tal... Tengo un problema con una linea de codigo en particular.

Error '13' en tiempo de ejecucion:
No coinciden los tipos

Primero hago un select y lo guardo en un recordset

obtenerRecordSet Conexion, rsEntMateria, "Select calificaciones.matricula as CalifMatricula, calificaciones.clave as CalifClave, calificaciones.nombremateria as CalifNomMateria, calificaciones.Calificacion, alumnos.matricula as AlumMatricula, alumnos.nombre , alumnos.grado, alumnos.seccion from Calificaciones right outer join alumnos on calificaciones.matricula = alumnos.matricula Where (alumnos.matricula = '" + txtMatricula.Text + "') AND (calificaciones.matricula = '" + txtMatricula.Text + "')"

Si hago esa consulta con un numero de matricula si me trae los datos correspondientes unicamente a ese registro en particular. Luego, tengo que insertar ese recordset en otra tabla

ejecutarComando Conexion, "Insert into TemBoleta(CALIFMATRICULA, CALIFCLAVE, CALIFNOMMATERIA, CALIFICACION, ALUMMATRICULA, NOMBRE, GRADO, SECCION) Values('" + rsEntMateria!CalifMatricula + "', '" + rsEntMateria!CalifClave + "', '" + rsEntMateria!CalifNomMateria + "', '" + CDec(rsEntMateria!Calificacion) + "', '" + rsEntMateria!AlumMatricula + "', '" + rsEntMateria!nombre + "', '" + CInt(rsEntMateria!grado) + "', '" + rsEntMateria!seccion + "')"

Esa linea es la que me da el error, ya intente con el cSTR y con el CDec y aun nada. Los datos de las tablas son.

Tabla Alumnos
Matricula Char(7) Pk
Nombre Char(60)
Grado Numeric(1,0)
Seccion Char(1)

Tabla Calificaciones
Matricula Char(7)
Clave Char(7)
NombreMateria Char(60)
Calificacion Numeric (5,2)

Tabla Temboleta
CalifMatricula Char(7)
CalifClave Char(7)
CalifNomMateria Char(60)
Calificacion Numeric (5,2)
AlumMatricula Char(7)
Nombre Char(60)
Grado Numeric(1,0)
Seccion Char(1)

Hice el insert directamente y si me funciono a la perfeccion, por lo cual estoy seguro que la consulta y el tipo de datos en la base de datos esta correcto, es la conversion de datos la que estoy seguro que me esta dando problemas.

:) Les agradeceria su ayuda, muchas gracias.

He resuelto el problema, el error se encontraba en la linea tal cual dije... los cambios quedaron de la siguiente forma

ejecutarComando Conexion, "Insert Into temBoleta (CalifMatricula, CalifClave, CalifNomMateria, Calificacion, AlumMatricula, Nombre, Grado, Seccion) Values ('" + rsBoleta!CalifMatricula + "', '" + rsBoleta!CalifClave + "', '" + rsBoleta!CalifNomMateria + "', '" + CStr(rsBoleta!Calificacion) + "', '" + rsBoleta!AlumMatricula + "', '" + rsBoleta!nombre + "', '" + CStr(rsBoleta!Grado) + "', '" + rsBoleta!Seccion + "')"

Donde a Calificacion y Grado del recordset se le agrego un convert to string con CStr, luego de eso el programa ya funciono al 100%

Espero que a alguien le sirva de ayuda.