The Annotation module is created with the CreateModule command by setting the Type to Annotation. The properties of the Annotation are altered with the ModifyModule command. This is similar to the Network | Graphics Output | Annotation command.
Module Type
Annotation
Syntax
object.Construct(“CreateModule”)
object.Option(“Type”, “Annotation”)
object.Do() or object.DoOnce()
object.Construct(“ModifyModule”)
object.Option(“Module”, “Annotation”)
object.Option(“Option_Name”, “OptionValue”)
object.Do() or object.DoOnce()
Option Name
Example
This example shows how to open a new Voxler file, add an Annotation, and alter the Annotation text.
Sub Main
'Declares VoxlerApp as an object
Dim VoxlerApp As Object
'Creates an instance of the Voxler application object
'and assigns it to the variable named "VoxlerApp"
Set VoxlerApp = CreateObject("Voxler.Application")
'Make Voxler visible
VoxlerApp.Visible = True
'Access CommandApi
Set CommandApi = VoxlerApp.CommandApi
'Create a new Voxler document
CommandApi.Construct ("New")
CommandApi.DoOnce()
'Add an annotation
CommandApi.Construct("CreateModule")
CommandApi.Option ("Type", "Annotation")
CommandApi.Do()
'Change the text that is displayed in the annotation to two lines of text
CommandApi.Construct ("ModifyModule")
CommandApi.Option ("Module", "Annotation")
CommandApi.Option ("AnnotationText", "New Voxler Annotation Automation" + vbCrLf + "Multiple lines")
CommandApi.Do()
End Sub
Used by: CommandApi object, CreateModule, ModifyModule
See Also