劉 藝

(機(jī)械工業(yè)勘察設(shè)計(jì)研究院勘察二公司，陜西西安 710043)

地鐵工程勘察工作的第一步就是依據(jù)規(guī)范和勘察大綱在擬建場(chǎng)地上對(duì)工程對(duì)象布置并統(tǒng)計(jì)勘察工作量。工作量的布置和統(tǒng)計(jì)工作出現(xiàn)得十分頻繁，例如在地鐵工程招投標(biāo)階段、進(jìn)場(chǎng)勘察前方案布置階段以及設(shè)計(jì)變更時(shí)都會(huì)遭遇到布置和統(tǒng)計(jì)勘察工作量。

因?yàn)榧夹g(shù)員布置的工作量往往需要經(jīng)過(guò)多次討論與審核，所以常常需要對(duì)已經(jīng)布置好的勘探點(diǎn)平面圖進(jìn)行反復(fù)修改甚至重新布置，以保證勘察工作量的最大優(yōu)化，節(jié)省工程造價(jià)。但是多階段、反復(fù)地修改勘察方案帶來(lái)了繁重的圖紙統(tǒng)計(jì)工作。

舉例說(shuō)，地鐵勘察投標(biāo)時(shí)，常常需要對(duì)好幾個(gè)標(biāo)段甚至是整條線來(lái)布置多種手段的勘察方案。還需要對(duì)每個(gè)標(biāo)段中的每個(gè)工點(diǎn)分階段來(lái)統(tǒng)計(jì)工作量。面對(duì)這樣的工程，僅僅是準(zhǔn)確地統(tǒng)計(jì)出圖紙上所有的勘察工作量也是相當(dāng)?shù)刭M(fèi)時(shí)費(fèi)力。

本文對(duì)基于VBA的AutoCAD二次開(kāi)發(fā)實(shí)現(xiàn)地鐵勘察中平面圖勘察工作量自動(dòng)統(tǒng)計(jì)這一課題進(jìn)行了研究，研究成果可以減輕勘察工作量統(tǒng)計(jì)工作的負(fù)擔(dān)，提高生產(chǎn)效率。

1 功能

1)對(duì)任意指定的不規(guī)則區(qū)域里的工作量進(jìn)行統(tǒng)計(jì)?？辈鞂?duì)象和勘察范圍的平面幾何形狀往往是不規(guī)則的，例如居民小區(qū)勘察常常需要分區(qū)統(tǒng)計(jì)工作量;地鐵勘察則需要對(duì)線路上的車站和區(qū)間分工點(diǎn)來(lái)統(tǒng)計(jì)工作量。所以用戶需要研究的成果能統(tǒng)計(jì)用戶指定的任意的不規(guī)則的平面范圍內(nèi)的勘察工作量。

2)對(duì)不同的勘察手段分開(kāi)統(tǒng)計(jì)。巖土工程勘察手段繁多，包括鉆探、坑探、原位測(cè)試和物探等等，進(jìn)行統(tǒng)計(jì)時(shí)不能眉毛胡子一把抓，必須將不同的勘察手段分開(kāi)統(tǒng)計(jì)。

要求軟件除了能統(tǒng)計(jì)不同勘察手段的孔數(shù)外，還需要對(duì)標(biāo)有進(jìn)尺深度的勘察手段(例如鉆孔、探井等)進(jìn)行進(jìn)尺求和。

3)勘察手段符號(hào)自動(dòng)識(shí)別并允許用戶自定義勘察手段?？碧近c(diǎn)平面圖的底圖往往十分復(fù)雜(例如含有大量的等高線，地物標(biāo)示，結(jié)構(gòu)標(biāo)示等)，勘察工作量的符號(hào)布置在這樣復(fù)雜的底圖上，這要求研究成果能智能地識(shí)別指定的勘察手段標(biāo)示而自動(dòng)略去其他信息。

針對(duì)不同的用戶和不同的勘察對(duì)象，勘察手段會(huì)變得異常豐富。例如地鐵勘察中除了常規(guī)的取樣鉆孔、標(biāo)貫鉆孔、探井和靜探以外，還包含大量的原位測(cè)試和物探手段，例如放射性測(cè)試點(diǎn)、地溫測(cè)試點(diǎn)、旁壓測(cè)試點(diǎn)、扁鏟側(cè)脹測(cè)試點(diǎn)等等。

允許用戶自定義的設(shè)置保證了軟件不會(huì)漏掉圖紙上任何一項(xiàng)勘察手段。

4)自動(dòng)繪制統(tǒng)計(jì)成果一覽表。程序會(huì)將統(tǒng)計(jì)出來(lái)的成果以文字的形式輸出，這樣就可以拷貝和編輯文本。更重要的是，統(tǒng)計(jì)的成果還可以繪制成表格放在圖紙任意指定的位置，作為成果圖紙的一部分。

2 實(shí)現(xiàn)

1)制圖要求。在使用AutoCAD布置勘探點(diǎn)圖紙的過(guò)程中，作如下要求:a.每一種勘探手段標(biāo)示必須是CAD塊。b.所有的孔深數(shù)據(jù)必須以單行文字的格式放置在同一個(gè)CAD圖層中，這里假定該圖層的名稱為“KSH”，并且要求“KSH”圖層中除了有孔深數(shù)據(jù)以外再無(wú)任何其他對(duì)象。

這兩個(gè)要求也是CAD制圖良好習(xí)慣的一部分，并不屬于特殊要求。

2)程序?qū)崿F(xiàn)框圖見(jiàn)圖1。

圖1 程序?qū)崿F(xiàn)框圖

3 實(shí)例

現(xiàn)在舉一個(gè)簡(jiǎn)單的例子來(lái)演示上述功能以便讓讀者的認(rèn)識(shí)更加具體。

圖2所展示的是某地鐵線初勘階段一個(gè)車站工點(diǎn)的勘探點(diǎn)平面布置圖。這張圖有如下幾個(gè)特點(diǎn):

1)勘察手段豐富。這個(gè)車站工點(diǎn)采用的勘察手段包括:取樣鉆孔、標(biāo)貫鉆孔、探井、取水樣鉆孔、雙橋靜探孔、等效剪切波速測(cè)試孔、旁壓測(cè)試點(diǎn)、放射性測(cè)試點(diǎn)、地溫測(cè)試點(diǎn)等。

2)較為復(fù)雜的底圖。圖紙上除了各種勘察手段標(biāo)示以外，還有地形等高線以及做成塊的地鐵軌道線和車站主體結(jié)構(gòu)。

圖3展示了用戶用封閉的多段線(粗黑線)圈出了需要統(tǒng)計(jì)的區(qū)域。

圖2 某地鐵線車站工點(diǎn)勘探點(diǎn)平面布置圖

圖3 封閉多線段圈出的統(tǒng)計(jì)區(qū)域圖

圖4顯示，調(diào)出程序，點(diǎn)擊“選擇邊框”按鈕后點(diǎn)選剛才繪制的封閉多段線(粗黑線)，窗口右邊的文本框立刻顯示出該區(qū)域內(nèi)的勘察工作量。文本框里的內(nèi)容可以拷貝到文字處理系統(tǒng)內(nèi)方便編輯。

點(diǎn)擊“插入工作量標(biāo)簽”后，用戶可以在圖紙上指定的任何區(qū)域內(nèi)插入一個(gè)如圖5所示的工作量分項(xiàng)統(tǒng)計(jì)標(biāo)簽(標(biāo)簽為CAD對(duì)象)，可成為圖紙的一部分。

圖4 統(tǒng)計(jì)區(qū)域的勘察工作量

圖5 工作量分項(xiàng)統(tǒng)計(jì)標(biāo)簽

這個(gè)過(guò)程顯示的是程序自動(dòng)統(tǒng)計(jì)出了圖紙上指定的不規(guī)則區(qū)域內(nèi)的所有勘察工作量的孔數(shù)和進(jìn)尺，并且自動(dòng)生成了說(shuō)明文檔和統(tǒng)計(jì)表格標(biāo)簽。

4 核心步驟的實(shí)現(xiàn)代碼

程序?qū)崿F(xiàn)框圖中的步驟6，7和8既是本文的創(chuàng)新點(diǎn)，也是實(shí)現(xiàn)功能的核心步驟。

現(xiàn)提供步驟6，7和8的實(shí)現(xiàn)代碼如下:

步驟 6 的實(shí)現(xiàn)［1］:

步驟7的實(shí)現(xiàn):

步驟8的實(shí)現(xiàn):

5 結(jié)語(yǔ)

1)程序可以處理任意指定的不規(guī)則區(qū)域內(nèi)的對(duì)象。

2)用戶自定義勘察手段，并依據(jù)定義好的勘察手段搜索對(duì)象。既能滿足不同用戶，不同項(xiàng)目的要求，同時(shí)從算法上排除了復(fù)雜底圖對(duì)統(tǒng)計(jì)與計(jì)算的干擾。

3)跨操作系統(tǒng)兼容。二次開(kāi)發(fā)的VBA代碼不會(huì)編譯成目標(biāo)程序，而是通過(guò)代碼解釋的方法運(yùn)行在AutoCAD軟件中，這樣保證了在不同的操作系統(tǒng)，不同的AutoCAD版本中，包含該代碼的dvb文件均可以被調(diào)用和執(zhí)行。

［1］曾洪飛，張 帆，盧擇臨.AutoCAD VBA＆VB.NET開(kāi)發(fā)基礎(chǔ)與實(shí)例教程［M］.北京:中國(guó)電力出版社，2008.