AnnGetSelectCount example for Access 2.0

Note: This topic is for Document/Medical only.

This example gets the number of selected annotation objects.

'Declare A local variable.
Dim SelectCount As Integer

'Get the number of selected objects and display a message box.
SelectCount = Me![LEAD1].Object.AnnGetSelectCount()
MsgBox Str$(SelectCount) + " objects selected"