IsNameSupported Example

Land Auto

IsNameSupported Example

Sub Example_IsNameSupported()
    
    ' This gets the IsNameSupported for the CogoPoints collection
    Dim cogoPnts As AeccCogoPoints
    Set cogoPnts = AeccApplication.ActiveProject.CogoPoints
    
    MsgBox "The IsNameSupported for CogoPoints is: " & cogoPnts.IsNameSupported, _
        vbInformation, "IsNameSupported Example"
    
End Sub