井下巷道剖面繪制程序介紹

井下巷道剖面繪制程序介紹

礦山測量工作是礦山生產建設的重要環節，也是礦山安全、生產、改造和編制長遠發展規劃等各項工作的基礎，繪制井下剖面圖，測量人員計算往往采用先繪制格網，然后逐點輸入，本項目通過CAD中的宏程序，通過批量展點，一次成圖，實現了電腦自動繪圖，極大減輕了測量人員的勞動強度，提高了勞動效率。

一、準備工作

由于程序是在cad環境下開發的vba程序，所以要注冊以下兩個控件，具體方法如下：

1、將下圖所示四個小東西放到C:WINDOWSsystem32目錄下，如果有則覆蓋

2、打開運行，分別輸入“regsvr32 comdlg32.ocx”和“regsvr32 msflxgrd.ocx”點擊確定，顯示注冊成功即可，如下圖：

二、加載程序

打開cad程序，工具——宏——加載工程，找到“繪制剖面.dvb”，打開就行了。

三、運行宏

跟剛才差不多一樣，工具——宏——宏，點擊“運行”，程序就開始運行了，見下圖

加載完還有一種運行方法，即在cad命令行輸入“-vbarun”回車，再輸入“繪制剖面”。

四、程序的操作

程序很簡單，填好四個參數，即“巷道名稱”、“巷道方位”、“橫向比例尺”、“縱向比例尺”，點擊，即可將井下測得的數據進行導入：

再點擊就能夠實現自動成圖了。在本圖中，測點、點位高、點之距，累計距離、坡度比等數據一目了然。

五、注意事項

1、數據的格式為：

點號，X坐標，Y坐標，頂板高程，底板高程

2、txt數據文件中前后不能有空格

完成單位：內蒙古鄂爾多斯永煤礦業投資有限公司

成果類別：小發明 獲獎等級：二等獎