Function FindLabel ( [DWMC1] )
kk = [DWMC1]
ff=""
for i = 0 to len(kk) step 6
ff=ff & left(kk,6) & chr(13)
kk=mid(kk,7)
next
FindLabel = ff
End Function
ArcMap换行标注
最新推荐文章于 2023-12-13 16:37:15 发布
Function FindLabel ( [DWMC1] )
kk = [DWMC1]
ff=""
for i = 0 to len(kk) step 6
ff=ff & left(kk,6) & chr(13)
kk=mid(kk,7)
next
FindLabel = ff
End Function