基于Microsoft﹢Visual﹢Basic绘制桩基工程桩位偏差图

'2017年1月建材与装饰地质·勘察·测绘基于MicrosoftVisualBasic绘制桩基工程桩位偏差图况佳亮（江西省地质矿产勘查开发局水文地质工程地质大队）摘要：在桩基工程中绘制竣工图，桩位偏差图是必不可少的资料之一。绘制桩位偏差图工作繁琐且工作量庞大，较容易出错。绘制完桩位偏差图后还需要与桩位偏差表一一核对，提高正确率。为提高工作效率，现基于MicrosoftVisualBasic编制桩位偏差图绘制程序。关键词：MicrosoftVisualBasic；桩位偏差图中图分类号：TU753文献标识码：A文章编号：1673-0038（2017）02-0213-031文件准备SetMyxl=GetObject（，"Excel.Application"）′读取桩位偏差以某工程数据为例，根据现场测量工作得到各桩位坐标值及表偏差值，按如下格式填写桩位偏差表。n=Myxl.activecell（2，5）+2′n代表读取表格的行数Fori=3Tonx=Myxl.activecell（i，3）y=Myxl.activecell（i，4）cc（0）=x′定义圆心座标东cc（1）=y′北cc（2）=0dong=Myxl.activecell（i，5）′读取东方向偏差值nan=Myxl.activecell（i，6）′读取南方向偏差值xi=Myxl.activecell（i，7）′读取西方向偏差值bei=Myxl.activecell（i，8）′读取北方向偏差值bh=Myxl.activecell（i，2）′读取桩位编号Ifbei=""Then2桩位偏差图绘制程序bhwz（0）=cc（0）-0.5×JASubZWPC（）′定义桩位偏差函数bhwz（1）=cc（1）+0.5×JADimdong，nan，xi，beiAsString"东南西北bhwz（2）=0DimMyxl′定义EXCEL表对象CallThisDrawing.ModelSpace.AddText（bh，bhwz，0.25×DimxAsDouble′桩位北坐标JA）′画桩位编号DimyAsDouble′桩位东坐标ElseDimiAsInteger′循环变量bhwz（0）=cc（0）-0.5×JADimcc（0To2）AsDouble′存储桩位坐标bhwz（1）=cc（1）-0.7×JADimcc1（0To2）AsDouble′东西方向偏差文字坐标bhwz（2）=0Dimcc2（0To2）AsDouble′南北方向偏差文字坐标CallThisDrawing.ModelSpace.AddText（bh，bhwz，0.25×DimnAsIntegerJA）′画桩位编号DimHAsDoubleEndIf′DimAttAsAcadAttributeIfdong<>""ThenDimJ1（0To2）AsDouble′箭头cc1（00=cc（00+0.55×JA′东DimJ2（0To2）AsDouble′箭头cc1（1）=cc（1）′北Dimline1AsAcadLinecc1（2）=0Dimline2AsAcadLinecc2（0）=cc（0）+0.55×JA′东DimbhAsString′桩号cc2（1）=cc（1）+0.05×JA′北Dimbhwz（0To2）AsDouble′桩号位置坐标cc2（2）=0DimJAAsDouble′绘制图比例CallThisDrawing.ModelSpace.AddText（dong，cc2，JA=1000′JA=1表示以m为单位，JA=1000，表示以mm为0.25×JA）′写东方向桩位偏差单位J1（0）=cc1（0）-0.055×JA·213· 地质·勘察·测绘建材与装饰2017年1月J1（1）=cc1（1）+0.05×JAJ2（2）=cc1（2）J1（2）=cc1（2）Setline1=ThisDrawing.ModelSpace.AddLine（cc1，J1）J2（0）=cc1（0）-0.055×JA′画箭头线J2（1）=cc1（1）-0.05×JAline1.Lineweight=acLnWt030′设置线宽J2（2）=cc1（2）Setline2=ThisDrawing.ModelSpace.AddLine（cc1，J2）Setline1=ThisDrawing.ModelSpace.AddLine（cc1，J1）′画箭头线′画箭头线line2.Lineweight=acLnWt030′设置线宽line1.Lineweight=acLnWt030′设置线宽ElseSetline2=ThisDrawing.ModelSpace.AddLine（cc1，J2）cc1（0）=cc（0）′东′画箭头线cc1（1）=cc（1）-0.55×JA′北line2.Lineweight=acLnWt030′设置线宽cc1（2）=0Elsecc2（0）=cc（0）+0.05×JA′东cc1（0）=cc（0）-0.55×JA′东cc2（1）=cc（1）-0.75×JA′北cc1（1）=cc（1）′北cc2（2）=0cc1（2）=0CallThisDrawing.ModelSpace.AddText（nan，cc2，0.25cc2（0）=cc（0）-1×JA′东×JA）′写南方向桩位偏差cc2（1）=cc（1）+0.05×JA′北J1（0）=cc1（0）+0.05×JAcc2（2）=0J1（1）=cc1（1）+0.055×JACallThisDrawing.ModelSpace.AddText(xi，cc2，0.25×J1（2）=cc1（2）JA)′写西方向桩位偏差J2（0）=cc1（0）-0.05×JAJ1（0）=cc1（0）+0.055×JAJ2（1）=cc1（1）+0.055×JAJ1（1）=cc1（1）+0.05×JAJ2（2）=cc1（2）J1（2）=cc1（2）Setline1=ThisDrawing.ModelSpace.AddLine（cc1，J1）J2（0）=cc1（0）+0.055×JA′画箭头线J2（1）=cc1（1）-0.05×JAline1.Lineweight=acLnWt030′设置线宽J2（2）=cc1（2）Setline2=ThisDrawing.ModelSpace.AddLine（cc1，J2）Setline1=ThisDrawing.ModelSpace.AddLine（cc1，J1）′画箭头线′画箭头线line2.Lineweight=acLnWt030′设置线宽line1.Lineweight=acLnWt030′设置线宽EndIfSetline2=ThisDrawing.ModelSpace.AddLine（cc1，J2）Setline2=ThisDrawing.ModelSpace.AddLine（cc，cc1）′画箭头线′画箭头线line2.Lineweight=acLnWt030′设置线宽line2.Lineweight=acLnWt030′设置线宽EndIfNextiSetline1=ThisDrawing.ModelSpace.AddLine（cc，cc1）EndSubline1.Lineweight=acLnWt0303将上述函数复制粘贴至MicrosoftVisualBasic，单击Ifbei<>""Then三角形符号运行：cc1（0）=cc（0）′东cc1（1）=cc（1）+0.55×JA′北cc1（2）=0cc2（0）=cc（0）+0.05×JA′东cc2（1）=cc（1）+0.45×JA′北cc2（2）=0CallThisDrawing.ModelSpace.AddText（bei，cc2，0.25×JA）′写北方向桩位偏差J1（0）=cc1（0）+0.05×JAJ1（1）=cc1（1）-0.055×JAJ1（2）=cc1（2）J2（0）=cc1（0）-0.05×JAJ2（1）=cc1（1）-0.055×JA图1·214· 2017年1月建材与装饰地质·勘察·测绘城市地铁岩溶地质条件下爆破参数分析与选定商跃锋（中铁十四局集团大盾构工程有限公司山东济南250002）摘要：以大连地铁富水岩溶区的暗挖施工为背景，利用国内现有的爆破施工机具和爆破施工技术，通过对大连地铁岩溶发育区，半土半石围岩，土石互层围岩，高溶洞发育区域爆破参数的制定和优化，确定适合城市地铁富水岩溶区爆破开挖的松动控制爆破施工参数，解决爆破开挖岩石与保护围岩这一相互矛盾的问题，减小对环境影响和保证施工安全，为类似环境下的城市地铁工程提供施工经验和借鉴意义。关键词：地铁施工；富水岩溶区；松动爆破；钻孔；装药；爆破参数中图分类号：P642.25文献标识码：A文章编号：1673-0038（2017）02-0215-031引言槽、溶隙及溶洞等发育强烈，岩层中溶洞存在串珠状分布的特目前国内城市地铁隧道修建已经普及，城市轨道交通规划、点。同时大连地铁靠近海边，地下水位高、地下水丰富，施工难度修建也已日益发展成熟，对于城市地铁隧道相对成熟的施工工极大。法主要有明挖法、盖挖法、暗挖法、盾构法等几大类。鉴于当前修3隧道成型的核心———松动爆破技术建地铁通常在繁华市区，而且地面交通繁忙、地下管线错综复松动爆破即利用爆破作用，使介质原地破裂或散落在原地及杂，暗挖法已成为修建地铁的主要施工工法，而城市软岩隧道受附近（爆破作用指数n<0.75）的爆破技术。制于地层中不良地质体、隧道施工工序衔接不畅、地下管线的材松动爆破是通过正确确定掏槽眼及周边眼的各爆破参数，使质和埋深不明等原因，造成安全事故屡见不鲜。尤其是目前国内爆破产生的冲击波和爆生气体在爆破区域内产生压碎圈、松动地铁施工中岩溶地质条件的隧道施工主要采用盾构法，对地铁圈及振动圈，将岩石碎裂成裂隙体。通过调整松动爆破的各爆破的岩溶地质采用爆破法施工的暗挖隧道，其爆破施工参数缺少参数，使爆破后的围岩断面轮廓整齐，最大限度地减轻爆破对围借鉴的地铁施工经验。岩的震动和破坏，尽可能维持围岩原有的完整性和稳定性。其主2工程概况要标准为：开挖轮廓成型，无明显的爆破裂缝，岩面平整，超挖和大连地铁一期工程207标段包含一站两区间，分别为松江路欠挖符合规定要求，无危石。富水区域，土石结合部位不会出现站～东纬路站区间（简称：松东区间）、东纬路站、东纬路站～春光坍塌、突水、涌泥现象。街站区间（简称：东春区间），线路全长2268m，全部采用暗挖法施4松动爆破参数分析与选定工，施工工法主要有洞桩法、中洞法、CRD法、台阶法等。本标段松动爆破首先是选择爆破方案，其次是组织管理、测量放线、线路呈南北方向，位于山东路和促进路道路下方，沿线建构筑物钻孔、爆破等，确定爆破方案后，需对现场进行几次试验，验证爆多，车站结构埋深浅，区间段多处紧邻居民楼房，同时需穿越一破方案的可操作性，调整并最终确定爆破参数。条铁路线和一条暗河，地下自来水、雨水、污水、燃气、热力、电以松东区间左线为爆破参数调整试验点，通过调整掏槽眼的力、电信管线密布成网。地质勘察报告及实际施工过程中揭示岩布局及深度、周边眼的深度及间距、单孔装药量、炮孔的布置形溶分布于全线段、发育数量多、大小岩溶构造形态均有发育、垂式等参数，通过多次爆破试验，对爆破效果进行对比验证，对爆向分带规律不明显，多数岩溶呈充填或半充填状况，充填物亦多破参数进行分析并最终确定适应于岩溶地质条件下强透水地层为粘土、红粘土及灰岩碎屑。岩面起伏变化大，岩层浅部溶沟、溶的软岩松动爆破参数。!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!4将得到桩位偏差图（如图2~3）5结语利用该方法，所需准备的前期工作量也较少。桩位编号及桩位坐标，在工程施工前期测量准备工作中就已经获得，桩位偏差值通过后期现场测量可以获得，只要按此格式完成桩位偏差表即可完成桩位偏差图的绘制，比传统手动绘制节省了时间和提高了正确率。收稿日期：2016-12-25图2图3·215·'