在许多地理地形图中，等高线取点的过程通常是繁琐单调的。本文利用VBA 对AutoCAD 进行二次开发，简化了等高线取点的过程。通过ActiveX 技术，程序实现取点生成的数据以 Excel 方式保存，使得数据便于处理分析，并实现VBA 程序随AutoCAD 启动时自动加载，简化了操作，提高了工作效率-In many geographic topographic maps, the contour points to take the process is usually tedious monotonous. In this paper, VBA for AutoCAD second development, simplifies the process of contour points to take. With ActiveX technology, the program to achieve the data generated to take the points stored as Excel, making data analysis easy to handle, and achieve with AutoCAD VBA program loading automatically at startup, simplify operations, improve work efficiency