AnnUnlocked example for Visual Basic

Note: Also works with Access 95 and 97.

Note: This topic is for Document/Medical only.

The following is an example of an AnnUnlocked event.

Private Sub Lead1_AnnLocked (ByVal hObject As Long)
    MsgBox "AnnObject: " & CStr(hObject) & " was unlocked!"
End Sub