Objects may be created using the CreateAnnoObj method. The method has to receive the type of the annotation object to be created. After the object has been created, object properties have to be set using dedicated methods such as AnnoUISetXX. The objects are ready to be drawn when the parameters are all set.
Private Sub CreateLine()
Dim nLine As Long
…
nLine = Anno. CreateAnnoObj(aotLine)
…
End Sub