Access - mensajes en access

hola espero me puedan ayudar creo que con un ejemplo me explicaria mejor: en mi base tengo la tabla Productos mas o menos asi
IdProducto 1
NombreProducto zapatos azules
costo $100
UnidadesEnExistencia 100
StockMinimo 10 (la deje libre porque puede variar segun el producto)

tengo tambien una tabla de salidas la cual me descuenta automaticamente la cantidad de salida a las unidades en existencia, mi pregunta es como puedo hacer para que al momento de darle salida a un producto si este que da por debajo de lo señalado en el stock minimo me mande un mensaje como este "la existencia del producto esta por debajo del stock minimo" y si es en 0 "no hay existencias del producto" y se ponga de color rojo pero que me deje continuar trabajando (mi tabla esta configurada para no ser menor a 0 osea -1, -2, etc)

IF UnidadesEnExistencia < StockMinimo then
MsgBox "La existencia del producto esta por debajo del stock minimo", vbOkOnly, "Aviso"
UnidadesEnExistencia.SetFocus
Exit Sub
End If

IF UnidadesEnExistencia = 0 then
MsgBox "No hay existencias del producto", vbOkOnly, "Aviso"
UnidadesEnExistencia .ForeColor = 255 (para letra en color rojo)
UnidadesEnExistencia .BackColor = 255 (para fondo en color rojo)
End If

me arroja un mensaje de erroo de compilacion error de sintaxix

¿En donde?

lo puse por procedimiento de evento Al cargar (el formulario) y al momento de guardar y abrir el formulario me arroja el error de compilacion error de sintaxis este es el codigo

Private Sub Form_Load()
DoCmd.Maximize
If UnidadesEnExistencia < StockMinimo Then
MsgBox "La existencia del producto esta por debajo del stock minimo", vbOKOnly, "Aviso"
UnidadesEnExistencia.SetFocus
Exit Sub
End If

If UnidadesEnExistencia = 0 Then
MsgBox "No hay existencias del producto", vbOKOnly, "Aviso"
UnidadesEnExistencia .ForeColor = 255 (para letra en color rojo)
UnidadesEnExistencia .BackColor = 255 (para fondo en color rojo)
End If
End Sub

No mi amigo estas mal, debes poner
UnidadesEnExistencia .ForeColor = 255
ó
UnidadesEnExistencia .BackColor = 255
Los que esta entre parentesis son comentarios que te puse como referencia para que sepas que hace cada linea, solo pon una si quieres la letra en rojo ó el fondo en rojo.
Tengo mi duda que te funcionce en el load tal vez sea mejor al grabar, pero pruebalo en ambos.
También checa que las cajas de texto se llamen UnidadesEnExistencia y StockMinimo.

oye muchas gracias por la ayuda ya lo ingrese sin los parentesis y si manda el mensaje pero solo si la existencia del primer producto esta por debajo
gracias

deje el codigo asi

Private Sub Form_Load()
DoCmd.Maximize
If UnidadesEnExistencia < StockMinimo Then
MsgBox "Conflicto de Existencias de Productos. Pulse el Boton Editar Productos para Verificar", vbOKOnly, "Aviso"
UnidadesEnExistencia.BackColor = 255
UnidadesEnExistencia.SetFocus
Exit Sub
End If
End Sub

Hola Edgar

Mira este Ejemplo
http://sites.google.com/site/jjjt1973/Home/control-de-almacen

Desde Venezuela
Jefferson