Access - Función Mod

Buenas.
He creado una tabla de clientes donde tengo un campo A (numérico doble) que es el número de Seguridad Social. Ahora tengo otro campo B (numérico byte) para el dígito de control. El código que tengo es:
B = A Mod 97

Pues bien, con escribieno en el campo A el numero 1512345678 el dígito sale bien (54), pero cuando el campo A tiene un número mayor de 2212345678, me da el error de Desbordamiento con el el número 6 en tiempo de ejecución.

Qué estoy haciendo mal?
Gracias y un saludo.

Hola!

Tu problema viene dado por el hecho de que, a partir del valor que comentas de A, sobrepasas la precisión que admite el operador mod.

Para solucionarlo basta que apliques una fórmula equivalente a lo que hace mod. Por ejemplo, tu código podría quedar:

Const miDiv as byte=97
Dim A as double
Dim B as byte
B= A - (miDiv * Fix(A / miDiv))

Para más info sobre el tema del mod puedes echar un vistazo a este link (http://bit.ly/1pWmd17). Ahí verás que hay otra fórmula equivalente que utiliza el divisor entero (división con la contrabarra "\"), pero en tu caso, y por los valores de A que utilizas, no te es útil porque te seguiría dando el problema de desbordamiento.

Un saludo,

http://neckkito.siliconproject.com.ar

esto lo puedes solucionar de la siguiente forma:

dado que el numero de la seguridad social siempre es un numero entero

el campo A CONFiGURALE CONO ENTERO LARGO

EL CAMPO B que recoge el resultado de la funcion MOD ,siempre es un numero entero, configurale tambien como entero largo


de antes cuando la capacidad de los ordenadores y la velocidad era escasa y lenta habia que recurrir a números que ocupasen menos espacio, pero en la actualidad,(a menos que sea una tabla muy gande), no te compliques utiliza los números con su mayor tamaño y te quitarás muchos inconvenientes