Ya descubri el error pero tengo otro "sql"

[mgocx]

Que tal como estan anteriormente inicie un tema de un error en la sentencia sql pero ahora tengo el siguiente problema:
hay campos que tienen valores negativos osea que por ejemplo el campo fijo = -1

a importante todos los campos son del tipo texto y la base de datos es acces

si saben que hacer ante este problema por favor avisenme

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

Dejo mi email: [EMAIL="[email protected]"][email protected][/EMAIL]

Hoy necesito yo, Mañana ustedes MUCHAS GRACIAS POR COMPARTIR Y AYUDAR....