Alignment Example

Land Auto

Alignment Example

Sub Example_Alignment()
    
    ' This example returns the PreferencesAlignment object that
    ' is used to access the StationLayer property
    Dim alignPref As AeccPreferencesAlignment
    Set alignPref = AeccApplication.ActiveProject.preferences.Alignment
    
    MsgBox "The Alignment preferences for StationLayer is: " & alignPref.GetString(kStationLayer)
    
End Sub