国产v综合v亚洲欧美久久_亚洲午夜在线播放_欧美日韩国产999_亚洲国产高清在线观看视频_亚洲 欧美 成人_一级性生活视频_中文字幕精品久久久久_裸体在线国模精品偷拍_男人的天堂日韩_精品88久久久久88久久久_国产精品白丝喷水在线观看_欧美一区二区在线免费观看

行政區(qū)劃圖不規(guī)范？不好看？作圖很是頭疼？這種種問題，今天以貴州省為例，制作一幅較為標(biāo)準的行政區(qū)劃圖。

效果圖如下：


01
數(shù)據(jù)準備

中國基礎(chǔ)數(shù)據(jù)（國界線、中國行政區(qū)_包含南海九段線）

貴州省基礎(chǔ)數(shù)據(jù)（貴州省高程數(shù)據(jù)、省界、市界、縣界）

符號庫

02
數(shù)據(jù)轉(zhuǎn)換

所有矢量數(shù)據(jù)均需轉(zhuǎn)為線圖層。

03
制圖（以圖1為例）

（1）選擇合適的數(shù)據(jù)框

（2）插入3個數(shù)據(jù)框并命名
（3）添加相應(yīng)數(shù)據(jù)并調(diào)整相應(yīng)位置

（4）調(diào)整圖層符
（5）在中國的小圖中調(diào)整自己的研究區(qū)顏色并添加首都

（6）調(diào)整研究區(qū)圖層符號

（7）制作蒙版透明效果

7.1添加市界面并調(diào)整顏色


7.2調(diào)整透明度


7.3字段換行標(biāo)注（代碼放最后）
圖片

7.4調(diào)整圖層順序及背景顏色

選中中國地圖及九段線圖層—右鍵—順序—放置頂層；右鍵屬性設(shè)置背景顏色


7.5添加圖例比例尺及其他圖層名稱導(dǎo)出地圖

（不在這里詳細講解）

附件 換行標(biāo)注完整代碼及解釋
Function FindLabel ([Prefecture] ) //[Prefecture]為標(biāo)注字段名稱，根據(jù)自己需要替換//

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)  // 數(shù)值4代表中文4個字節(jié)后換行標(biāo)注，可以更具實際需要進行修改//End Function