GridNorthing Example
Sub Example_GridNorthing()
' This example returns the GridNorthing for the first CogoPoint in the collection.
Dim cogoPnt As AeccCogoPoint
Set cogoPnt = AeccApplication.ActiveProject.CogoPoints.Item(0)
MsgBox "The GridNorthing for the first CogoPoint in the collection is: " & cogoPnt.GridNorthing, _
vbInformation, "GridNorthing Example"
End Sub