Ciao a tutti.
devo fare un controllo su un campo numerico che faccia cio':

all inserimento del nuovo record se il campo è uguale ad uno già inserito esca una msgbox ("blablalbbla")

Private Sub ID_Reg_BeforeUpdate()
Dim Messaggio As String
Dim Risposta As Integer

If ID_Reg = ID_Reg.BeforeUpdate Then

Messaggio = "blablablabla?"
Risposta = MsgBox(Messaggio, vbQuestion + vbYesNo, "ATTENZIONE")

Select Case Risposta

Case vbYes
Case vbNo
DoCmd.RunCommand acCmdUndo


End Select

End Sub

End Sub






naturalmente non va questo cod.
avete dei consigli??