Two step confirm. Present the first message in a Yes/No message box.
If the response is Yes, then present a confirmation message and get the user to type 'yes' for final confirmation
- if FirstMsgString="" then the first message will not be displayed (assume the caller has already done so)
The first Yes/No message
The second confirmation message
Notify if the action was abandoned in the second stage
Dim b as Boolean
b = ConfirmTwoStep("Are you sure you want to delete the record", "", True)