为自动从CAD图纸中提取线路的坡度坡长数据,该文编写了VBA程序。首先人工输入起点站和终点站名称、坡度坡长和标高所在图层名称,通过程序读取设计坡度和设计标高所在图层的数据,将结果导出到Excel;然后在Excel中对数据进行排序,通过设计坡度的坐标分离环线数据,通过设计坡度和设计标高之间的距离分离上行线数据和下行线,最后通过设计标高得到坡度值的正负号。通过实例验证了程序的有效性和快速性。