ExternalStaToInternal Example
Sub Example_ExternalStaToInternal()
' This example gets the ExternalStaToInternal of 100.0
' for the first Alignment in the collection..
Dim align As AeccAlignment
Set align = AeccApplication.ActiveProject.Alignments.Item(0)
Dim intSta As Variant
intSta = align.ExternalStaToInternal(100#)
MsgBox "The ExternalStaToInternal of 100.0 for the first Alignment is: " & intSta(0), _
vbInformation, "ExternalStaToInternal Example"
End Sub