基于VBA的铁路地质横断面填绘程序设计

Program Design of Railway Geological Cross Section Drawing Based on VBA

路基、桥梁设计前,为了解特定横断面位置的地质情况,需地质专业填绘特定横断面位置的地层、岩土施工分级等信息。以往地质横断面的填绘方法是:人工读取特定里程,从已整理完善的纵断面图中获取该里程处的地层信息,最后采用人工绘制地层界线,转换纵向比例尺,并填绘地层层号、岩土类别、岩土施工分级等参数。笔者基于AutoCAD及office软件开发地质横断面填绘程序。该程序通过VBA平台连接了AutoCAD、工程地质数据库及Excel数字表格,采用程序读图,对图面信息进行编码整理,并与工程地质数据库地层信息进行快速检索匹配,以替代人工填绘。该程序应用于京雄商高速铁路及广湛铁路等项目中,解决了地质横断面效率、准确率不高的问题。

Before designing roadbeds and bridges, in order to understand the geological conditions of specific cross-section positions, it is necessary to fill in the strata, geotechnical construction classification and other information of specific cross-section positions. In the past, the filling method of geological cross-section was as follows: manually read a specific mileage, obtain the stratigraphic information at the mileage from the well-organized longitudinal section map, and finally manually draw the stratigraphic boundary, convert the vertical scale, and fill in the stratigraphic layer number.,geotechnical category, geotechnical construction classification and other parameters. The author develops a geological cross-section drawing program based on AutoCAD and office software. The program links AutoCAD,engineering geological database and Excel digital table through the VBA platform, uses the program to read the map, encodes and arranges the surface information, and quickly retrieves and matches the stratigraphic information of the engineering geological database to replace manual drawing. This program is applied to projects such as Jingxiongshang high-speed railway and Guangzhan railway, and solves the problem of low efficiency and accuracy of geological cross-section.