|
为回报在论坛所学，我用VB引用AutoCAD及Excel自编了“自动绘制横断面图”程序，请论坛各位同行试用，并请各位多提出宝贵意见。
黄玉宏 二○○六年十月二十日 联系：htgsgcc@163.com
以下是软件的“帮助”文件：
1、本软件适用于公路或水利各种横断面图绘制,提供1:100和1:200两种比例。主要功能有3种：①绘制基本横断面图；②绘制路面顶层及原地面压实后断面图(戴帽子求土方)；③绘制任意断面的填方或挖方横断面。
2、打开已输入数据的“横断面数据模板”文件,关闭其它所有Excel文件后方可打开本软件。软件启动时要输入绘图比例参数,1:100比例绘图参数为1,1:200比例参数为2；只有输入1或2时“绘图参数输入”界面才会自动消失(因输入该参数后软件立即读入数据,故数据较多时本过程可能要几秒钟),输入其它数字软件自动关闭。“绘图分类”菜单选择3种绘图类别中的一种,点“绘图”按钮即可自动进入CAD界面。如使用CAD模板则要在启动本软件之前打开它(即：“横断面数据模板”--“CAD模板”--“本软件”)。
3、CAD中处理：断面图可在CAD任意位置捕捉或输入捕捉点坐标。图形移动前基点坐标为(0,0),捕捉点Y坐标应为50的整数倍,X坐标宜为图纸中心线或图纸左边线。每次点“绘图”按钮软件都自动最小化并进入CAD界面(绘制首横断面该过程会耗时几秒钟),CAD软件可一直最大化,通过任务栏本软件最小化米格纸图标和CAD相互切换。
4、本软件的智能：对路基填方或挖方能自动修剪坡脚线和自动延伸不够长的原地面线；能自动计算填挖面积；能将断面积汇总到“面积汇总”工作表；汇总时能自动清除重复桩号值；能对断面桩号自动排序(此功能须Excel2002及以上版本)；能自动将用户输入的文本型或数字桩号转换成标准桩号。 花300元购买本软件绝物超所值!
5、界面·流程·编程：①为界面简洁,软件使用了隐藏式提示文字,软件打开超过2分钟提示文字将不再出现；每次按下“绘图”按钮时按钮文字显示当前绘图类别且按钮变为紫色,释放鼠标时按钮恢复原状。②“横断面数据模板”文件提供基础数据,软件读入数据并处理后同时向CAD发送绘图命令和将部分数据(如面积)发送到“横断面数据模板”文件中。③源代码使用了大量数组且经过了长时间优化,软件启动速度相当快,特别是大量数据时效果明显!(P4 2.4G + 256M计算机60000个数据启动时间约6秒!)
6、☆使用注意：要改变绘图比例须关闭本软件并重新打开。“横断面数据模板”文件可改名但其各工作表则千万不能改名,输入数据时其各工作表有粉红色图案特征单元格前不能删除及插入行或列；并且在整个绘图过程中该文件不能关闭,也不能向其内写入数据,如要新增或修改数据亦须关闭本软件并重新打开。 | 
发表于 2006-10-20 09:30:00
置顶卡
变色卡
显身卡
楼主