[Resolvido]Como criar um código para verificar registros?

Boa Noite! Mestres.

Galera, estou com uma dúvida não sei se é possível, fiz algumas pesquisas mas não encontrei nada, é o seguinte Tenho um campo em um Sub Formulário, Chamado[Quantidade]
e em outro Sub Formulário, eu cadastros os produtos um a um. Gostaria de um código que emitisse um aviso quanto eu cadastrasse mais produtos do que a quantidade informada.

Se alguém puder me ajudar, Desde já agradeço.

No evento antes de atualizar pode tentar:

Dim nReserva As Long 'Vai armazenar seu estoque no item
Dim nSaida As Long 'Vai armazenar a quantidade que pretende dar saída
Dim nEstoque As Long 'Vai receber o valor da subtração estoque X saida e será usado para atualizar o estoque
nReserva = Nz(DLookup("Quantidade", "SuaTabela", "CodDeReferencia='" & SuaChaveEstrangeira & "'"))
nSaida = SeuCampoQuantidadeSaindo

   If nReserva < nSaida Then
      MsgBox "Não existe estoque suficiente para atender esta saída", _
                                               vbInformation, "Atenção"
           Cancel = True

     Else
           nEstoque = nReserva - nSaida
           CurrentDb.Execute _
           "UPDATE SuaTabela SET Quantidade='" & nEstoque & "' WHERE CodDeReferencia=" & SuaChaveEstrangeira
   End If

Veja aí, com alguns ajustes vai dar certo.

Boa Noite Dilson! Vou testar e logo que tiver resultado, informo.

Desde já Agradeço.

Boa Noite! desculpe-me a demora deu tudo certo, valeu pela ajuda ..

resolvido!!!