对于为DWG格式地形图,里面有成千上万个高程点及其高程注记,其中高程点为块,并且其Z值全为0,高程注记为文字,内容为高程值,将注记的内容赋给高程点,作为高程点的Z值;文件是VBA编写的,可以直接从CAD菜单—>工具->宏->加载工程直接将其加载运行就可以,运行中有个选取点的过程,选取完成后enter就OK了