StationAhead Example
Sub Example_StationAhead()
' This example returns the StationAhead value
' for the StationEquation in the collection.
Dim align As AeccAlignment
Dim StaEqu As AeccStationEquation
Set align = AeccApplication.ActiveProject.Alignments.Item(0)
Set StaEqu = align.StationEquations.Item(0)
MsgBox "The setting StationAhead is " & StaEqu.StationAhead, vbInformation, "StationAhead Example"
End Sub