G'day Joe

Don't think this is the right newsgroup you need.

But for what is worth, I can give you the VBA equivalent of what your after.

Sub YourControls_AfterUpdate()

Dim TheMessage As Integer

TheMessage = MsgBox("What you want the Message to Say", vbOKCancel)

If TheMessage = vbOK Then
DoSomething
Else
CancelEvent = True
End If
End Sub

HTH
Mark