AnnMove example for Visual Basic

Note: Also works with Access 95 and 97.

Note: This topic is for Document/Medical only.

This example moves one or more selected annotation objects.

'Declare local variables.
Dim DeltaX, DeltaY

'Use twips. 
Lead1.ScaleMode = 1

'Specify arbitrary delta values. 
DeltaX = +2000 
DeltaY = -2000

'Move the selected annotations.
Lead1.AnnMove DeltaX, DeltaY, True