alerta data vencimento

boa noite, meu banco de dados(2003) de controle de despesas conta os campos:
data vencimento
produto
valor
a cada mes coloco novos valores para os mesmos produto
a duvida é :
como fazer ele me avisar que um determinado produto esta vencendo?
exemplo:
abro o banco de dados no fomulario inicial
antes de inseri novos dados ele me avisa
"pagamentos pendentes"
grato

Ola amigo, seja bem vindo ao Forúm.

Pode criar uma consulta com os campos:
Produto
Valor
Data_Vencimento

No criterio do campo data coloque <=Data()

Crie um formulario a partir dessa consulta exemplo frm_vencidos

No evento ao abrir do form principal:

Código:

Private Sub Form_Open(Cancel As Integer)
  If DCount("*", "SuaConsulta") > 0 Then
    DoCmd.OpenForm "frm_vencidos"
  Else
Exit Sub
  End If
End Sub

mto bom
funcionou certinho
mto grato
abraços

Que bom que tenha saido como esperava, se não houver mais duvidas marque o

tópico como Resolvido para encerrarmos o assunto.