In this example, when the EditingTextAnnotation event fires, the Undo selection on the Edit menu is updated so it indicates the action the Undo method will perform if the user invokes it.
Private Sub ImgEdit1_EditingTextAnnotation(ByVal Editing As Boolean)
'When a text annotation is edited, this event could be used to
'change the caption for the undo function to describe the function
'which would be undone if the Undo menu pick was selected
mnuEditUndo.Caption = "Undo Annotation Edit"
End Sub