Cogo Labels

649
2
01-25-2012 08:49 AM
CarsonGarver1
New Contributor
In attempting to display cogo labels we are trying to display radius but only when it is populated in the field via the Create COGO Fields tool in ArcCatalog.
we are trying to get something similar to cad

Function FindLabel ( [Direction], [Distance], [Radius] )
FindLabel = [Direction] & vbNewLine & [Distance] & vbNewLine & â??R = â?? &[Radius]
End Function

With this script it will put an R= on every label. How do we get it to do R= [Radius] only when radius is populated in the attribute table.
Tags (2)
0 Kudos
2 Replies
RichardFairhurst
MVP Honored Contributor
In attempting to display cogo labels we are trying to display radius but only when it is populated in the field via the Create COGO Fields tool in ArcCatalog. 
we are trying to get something similar to cad 

Function FindLabel ( [Direction], [Distance], [Radius] ) 
FindLabel = [Direction] & vbNewLine & [Distance] & vbNewLine &   â??R = â?? &[Radius]
End Function 

With this script it will put an R= on every label. How do we get it to do R= [Radius] only when radius is populated in the attribute table.


Function FindLabel ( [Direction], [Distance], [Radius] )
if IsNull([Radius]) Then
FindLabel = [Direction] & vbNewLine & [Distance]
ElseIf [Radius] = 0 Then
FindLabel = [Direction] & vbNewLine & [Distance]
Else
FindLabel = [Direction] & vbNewLine & [Distance] & vbNewLine & â??R = â?? &[Radius]
End If
End Function
0 Kudos
CarsonGarver1
New Contributor
Thank you!
0 Kudos