当前位置：首页 > news >正文

分式注记种表达方式arcgis

news 来源：原创 2025/5/14 6:04:18

程序代码：
6分子 “”& [备注] & “—” & [小班号] & “&”-“[类型]&vbnewline&” " & VbCrLf & “” & [造林树种] & “—” & [造林面积]"&vbnewline&[类型]
是这样吗

五分子式 “” &" " & [小班编号] &" “&”-" &" "& [小班面积] & " " & “” & vbNewLine & [年度] & “-” & [储备林] & “-” & [优势树种]

上下： “”& " " & [OLD] & " " &“” & vbcrlf & [name]

两上两下 “”& " " & [A02] &“- “& [A04] &”” & vbcrlf &[A06] &“-”& [A07]

1前1上1下 [MC] & chr(10) & [SSQY] & "———— " & chr(10) & [SHAPE_Area]

[A08] & “^{” & [A04] & “}” 上标

[A06] &“_{” & [A06] & “}” 下标

程序代码：

1前2上2下

        "" & "" & [a02] &"— "& [a04]   &  chr(10)  &   [a06]   & "———————  "  &  chr(10)  &  [a08] &"—"& [a07]

1前1上1下1后
[a02] & chr(10) & [a08] & "———— " & [a09] & chr(10) & [a04]

1上1下1后
[a08] & chr(10) & "——— " & [a06] & chr(10) & [a04]

五分子式

Function FindLabel ([MJ],[DL],[LZH],[XBH],[YSSZ],[LJ],[YBD],[BHDJ])
dim a,b
a=len([MJ])
b=len([DL])
FindLabel
=“”&
[XBH]
&“–”
&[LZH]
&“–”
&
[YSSZ]
&“–”
&
[LJ]&“” & VbCrLf

& space(a) &"

“& space(b) & VbCrLf & [MJ]&”–“&
[YBD] &”–“& [DL] &”–"& [BHDJ]

End Function

上下标等。“” & [分子的字段] & “” & vbNewLine & [分母的字段]，分数形式的标注。

上下角标形式

三个字段分别是：text、super_text和sub_text。
步骤如下[text] & “^{” & [super_text] & “}” & “_{” & [sub_text] & “}”
其中"^{" & [super_text] & "}"表示将super_text字段里的内容作为上角标
“_{” & [sub_text] & "}"表示将sub_text字段里的内容作为下角标
Font: “” & [LABELFIELD] & “” Color: “” & [LABELFIELD] & “” “” & [LABELFIELD] &
“” Bold: “” & [LABELFIELD] & ""Italic:
“” & [LABELFIELD] & “” Underline: “” & [LABELFIELD] & “” All caps: “” & [LABELFIELD] & “” Small caps: “” & [LABELFIELD] & “” Superscript “^{” & [LABELFIELD] & “}” Subscript: “_{” & [LABELFIELD] & “}” Character spacing (%): “” & [LABELFIELD] & “” Word spacing (%): “” & [LABELFIELD] & ""Leading (pts): “” & [LABELFIELD] & "</LIN需要注意的是，使用这些标签后，生成的Label语句在Verify按钮中是不生效的，只对最终的显示结果生效。

高级标注在arcgis中可以使用简单的单行标注，也可以勾选advanced使用复杂一点的多行标注为了有效的控制label的色彩字体等也可以使用arcgis label tags
使用VBScript1. 加前导字符串："Parcel no: " & [PARCELNO] "Parcel no: " & [PARCELNO]
2. 四舍五入显示：Round ([AREA], 1)
3. 字符全部变小写：LCase ([NAME])
4. 首字母大写其余小写：Function FindLabel ( [NAME] )
5. FindLabel = UCase(Left([NAME],1)) & LCase(Right([NAME],
Len([NAME]) -1)) End Function
5. 多字段多行显示：[PARCEL_ID] & vbNewLine & [LAND_USE]
6. 单字段多行显示（此处以逗号为分隔符）：
Function FindLabel ( [LABELFIELD] )
FindLabel = replace([LABELFIELD], ", ", vbnewline)
End Function
7. 分条件标注并使用
8. tags：Function FindLabel ([NAME], [POPULATION])
if ([POPULATION] >= 250000) then
FindLabel
= “” + [NAME] + “” else FindLabel = [NAME] end if End Function

“” & [Sheet1 $KaTeX parse error: Expected 'EOF', got '&' at position 7: .小班号] &̲"—"& [Sheet1$ .优势树种] &“—”& [Sheet1 $KaTeX parse error: Expected 'EOF', got '&' at position 9: .采伐方式] &̲ "</UND>"& VbNe\dots$ .小班面积] &“—”& [Sheet1 $KaTeX parse error: Expected 'EOF', got '&' at position 6: .蓄积] &̲"—"& [Sheet1$ .出材量]

“”&&“—”&&“—”&& “”& VbNewLine &&“—”&&“—”&