ArcGIS行政区位图制作流程(附行政区划练习数据)

在这里插入图片描述
行政区划图不规范?不好看?作图很是头疼?这种种问题,今天以贵州省为例,制作一幅较为标准的行政区划图。

效果图如下:
在这里插入图片描述
在这里插入图片描述
01
数据准备

中国基础数据(国界线、中国行政区_包含南海九段线)

贵州省基础数据(贵州省高程数据、省界、市界、县界)

符号库

文末有连续数据下载链接

02
数据转换

所有矢量数据均需转为线图层。

03
制图(以图1为例)

(1)选择合适的数据框在这里插入图片描述
在这里插入图片描述
(2)插入3个数据框并命名在这里插入图片描述
(3)添加相应数据并调整相应位置

在这里插入图片描述
(4)调整图层符在这里插入图片描述
(5)在中国的小图中调整自己的研究区颜色并添加首都

在这里插入图片描述
(6)调整研究区图层符号在这里插入图片描述
在这里插入图片描述
(7)制作蒙版透明效果

7.1添加市界面并调整颜色在这里插入图片描述
在这里插入图片描述
在这里插入图片描述
7.2调整透明度在这里插入图片描述
在这里插入图片描述
在这里插入图片描述
7.3字段换行标注(代码放最后)在这里插入图片描述
图片

7.4调整图层顺序及背景颜色

选中中国地图及九段线图层—右键—顺序—放置顶层;右键属性设置背景颜色在这里插入图片描述
在这里插入图片描述
在这里插入图片描述
7.5添加图例比例尺及其他图层名称导出地图

(不在这里详细讲解)

附件 换行标注完整代码及解释
Function FindLabel ([Prefecture] ) //[Prefecture]为标注字段名称,根据自己需要替换//

n=len( [Prefecture] )

if (n<5) then

 FindLabel = [Prefecture]

else

  FindLabel = left( [Prefecture] ,4) & vbnewline & right( [Prefecture] ,n-4)

end if

End Function

Function myFind( Prefecture,wd)

n=len(Prefecture)

if (n<wd+1) then

 myFind = Prefecture

else

  myFind = left(Prefecture,wd) & vbnewline & right(Prefecture,n-wd)

end if

End Function

Function FindLabel( [Prefecture] )

FindLabel= myFind( [Prefecture],4)  // 数值4代表中文4个字节后换行标注,可以更具实际需要进行修改//

End Function
  • 13
    点赞
  • 146
    收藏
    觉得还不错? 一键收藏
  • 6
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 6
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值