Access: TextBoxA > TextBoxB = Error

Tengo una base de datos donde tengo valores a consultar mediante formulario. La cantidad máxima posible está en el TextBox llamado TOTAL. El valor que ingreso para consultar en un TextBox llamado ID_1.

Necesito que, al ingresar el valor en ID_1 me arroje un error si este valor es mayor al TOTAL (porque no puedo consultar un valor inexistente). Tengo 12 elementos a consultar.

Desarrollé el código siguiente como para valorar, pero el problema es que me da como correctos los valores de 2 cifras (10, 11 y 12). Me da error con el 13 (correcto) pero con los números del 2 al 9 también. El 1 me lo toma como correcto.

Código:
Private Sub ID_1_Exit(Cancel As Integer)

If Form!CANTIDAD.Value = 1 Or IsNull(ID_1) Then

Mensajes.MJE_CANT_NOEXISTE_OK

Form!EDITA.Enabled = False

Else

Form!EDITA.Enabled = True

End If

End Sub

¿Dónde está el error? ¿Cómo puedo hacer para que me compare los valores ingresados y me de el error sólo cuando el valor no esté dentro de lo permitido?

Añade tu respuesta

Haz clic para o