CAD地形图矢量化后处理程序

CAD地形图矢量化后处理程序采用基于AutoCAD的VBA编写，能够对已经矢量化的地形图中的散点、等高线进行快速赋值。

首先需启动AutoCAD 2000+及本程序
散点自动赋值：程序自动搜索离散点最近的文本作为散点高程
1、点击散点自动赋值按钮，程序将切换到CAD
2、选择一个或多个散点、散点文本，散点个数与散点高程个数应相等，散点可以是多段线、圆、圆弧、椭圆、块、圆环几种CAD对象
3、程序将在散点到散点高程之间连线，并出现如下对话框，根据提示选择是或否，程序将执行相应的操作。
　

等高线等差赋值：程序将根据首根等高线高程、等高距对顺序选择的多根等高线依次赋值
1、点击等高线等差赋值按钮，程序将切换到CAD
2、根据等高线高程大小，点选或Fence方法选择一根或多根等高线
3、程序将对等高线等差赋值。

等高线高程相等：
1、点选或Fence方法选择一根或多根【需赋值的等高线】，步骤2仅选择1根时，步骤1可以采用任意方法选择，无需顺序选择。
2、点选或Fence方法选择一根或多根与【需赋值的等高线】高程对应相等的等高线，也可仅选择一根等高线，步骤1选择的等高线将全部与这根等高线高程相等。
3、程序将对等高线赋值。