Error en Consulta sql

[mgocx]

Hola que ta bueno como dice el titulo tengo una consulta sql y me genera un error que no consigo saber cual es.
aviso que cada ves que presiono el boton y se ejecuta la accion no siempre salen estos errores.
solo me pasa de ves en cuando es por eso que no consigo saber cual es el error del codigo.
si alguien tiene alguna idea se lo agradeceria a continuacion dejo el codigo.

Código:

adoarticulos.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\DATA\B.mdb;" & "Persist Security Info=False"
adoarticulos.RecordSource = "select DESCRIPCION,CODIGO,SUM((TOME*CANTIDAD)/6),SUM(TOME*CANTIDAD),SUM(((TOME*CANTIDAD)/6)*LASTPESO),PREPRO,SUM(PERFILES*CANTIDAD) from PREARTICULOS where PRESUPUESTO ='" & DataCombo1.Text & "' and PERFILES <> '" & "0" & "' group by CODIGO,DESCRIPCION,PREPRO"
adoarticulos.Refresh

'##########################################################################
'Generalmente el error se proboca aca
'- - -
adoarticulos.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\DATA\B.mdb;" & "Persist Security Info=False"
adoarticulos.RecordSource = "select DESCRIPCION,CODIGO,SUM((TOME+M2+FIJO)*CANTIDAD),PREPRO,SUM(ACCESORIOS*CANTIDAD) from PREARTICULOS where PRESUPUESTO ='" & DataCombo1.Text & "' and ACCESORIOS <> '" & "0" & "' group by CODIGO,DESCRIPCION,PREPRO"
adoarticulos.Refresh

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

adoarticulos.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\DATA\B.mdb;" & "Persist Security Info=False"
adoarticulos.RecordSource = "select DESCRIPCION,CODIGO,SUM(M2*CANTIDAD),PREPRO,SUM(INTERIORES*CANTIDAD) from PREARTICULOS where PRESUPUESTO ='" & DataCombo1.Text & "' and INTERIORES <> '" & "0" & "' group by CODIGO,DESCRIPCION,PREPRO"
adoarticulos.Refresh

adoarticulos.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\DATA\B.mdb;" & "Persist Security Info=False"
adoarticulos.RecordSource = "select DESCRIPCION,CODIGO,SUM(M2+FIJO*CANTIDAD),PREPRO,SUM(MATEXSUPER*CANTIDAD) from PREARTICULOS where PRESUPUESTO ='" & DataCombo1.Text & "' and MATEXSUPER <> '" & "0" & "' group by CODIGO,DESCRIPCION,PREPRO"
adoarticulos.Refresh

Cada una de las anteriores cadenas y consultas sql las presento en 4 datagrid distintos.

El Proble esta cuando presiono el boton me sale el siguiente error:

No coinciden los tipos de datos en la expresion de criterios

y en el depurador el siguiente:

Error '-2147217913 (80040e07)' en tiempo de ejecucion :
Erro en el metodo 'refresh del adodc
los campos de la bases de datos son todos del tipo texto con capacidad de 255 caracteres.

si alguien tiene una idea seria de muchisima utilidad.
desde ya muchas gracias mgocx
aca dejo mi mail por si alguien necesita una mano y quiere avisarme personalmente.
[EMAIL="[email protected]"][B][email protected][/B][/EMAIL]
--------------------