張博

【摘 要】本文簡述了利用VB編程語言對AutoCAD進(jìn)行二次開發(fā)的原理和方法，并結(jié)合筆者的實踐，以編制水文斷面繪圖程序為例探討了VB與AutoCAD的連接、繪制縱斷面的數(shù)據(jù)格式、數(shù)據(jù)轉(zhuǎn)換，以實現(xiàn)快速繪制縱斷面。

【關(guān)鍵詞】AutoCAD；二次開發(fā)；VB

0 概述

AutoCAD是由美國Autodesk公司于20世紀(jì)80年代初為微機(jī)上應(yīng)用CAD技術(shù)而開發(fā)的繪圖程序軟件包，經(jīng)過不斷地完善，現(xiàn)已經(jīng)成為國際上廣為流行的繪圖工具。由于它具有完善的繪圖功能、良好的用戶界面、易學(xué)易用等特點，因而被廣泛地應(yīng)用于測繪、規(guī)劃、設(shè)計、土地管理等行業(yè)，AutoCAD為用戶提供了多種二次開發(fā)工具，其中主要有AutoLISP、ObjectARX和VBA。

AutoLISP是一種解釋性的表結(jié)構(gòu)處理語言，具有語言結(jié)構(gòu)簡單、開發(fā)周期短、不依賴于操作平臺的特點，但是作為解釋語言，其運行速度和保密性方面有一定的缺陷，并且不適合開發(fā)有復(fù)雜運算的軟件。

ObjectARX是一種較新的開發(fā)AutoCAD應(yīng)用程序的工具，它以C++為編程語言，采用先進(jìn)的面向?qū)ο蟮木幊淘?，提供可與AutoCAD直接交互的開發(fā)環(huán)境，能使用戶方便快捷地開發(fā)出高效簡潔的AutoCAD應(yīng)用程序。但是C++語言較復(fù)雜，開發(fā)ARX應(yīng)用程序需要較多的軟件開發(fā)經(jīng)驗，也不適合作為非軟件開發(fā)專業(yè)人員的測繪工作者的開發(fā)工具。

Visual Basic（VB）是美國微軟公司推出的程序開發(fā)工具，它簡單易學(xué)，適用面廣，在Windows平臺上被廣泛使用。為此，可以作為測繪工作者進(jìn)行程序設(shè)計的首選工具。

1 ActiveX Automation技術(shù)與VB

1.1 ActiveX Automation技術(shù)

ActiveX Automation是微軟公司的一個技術(shù)標(biāo)準(zhǔn)，其宗旨是在Windows系統(tǒng)的統(tǒng)一管理下協(xié)調(diào)不同的應(yīng)用程序，允許這此應(yīng)用程序之間相互溝通、相互控制，但兩個應(yīng)用程序間的溝通不是對等的，其中，一個程序稱為客戶程序（Client），另一個程序稱為服務(wù)程序（Server），一般情況下，由客戶程序提出需要進(jìn)行什么操作，服務(wù)程序針對操作申請，完成相應(yīng)的命令。AutoCAD R14后的版本中就引入了ActiveX Automation技術(shù)，利用AutoCAD ActiveX技術(shù)，可以從其它外部應(yīng)用程序（如VB）或AutoCAD內(nèi)部（AutoCAD VBA）操作AutoCAD對象。VB是最為常用的支持ActiveX Automation技術(shù)的開發(fā)工具，它可以編制出ActiveX的客戶程序，用來操作AutoCAD。即利用VB編制能與AutoCAD相溝通的應(yīng)用程序，以此來實現(xiàn)AutoCAD的二次開發(fā)。

2 開發(fā)AutoCAD2004應(yīng)用程序?qū)嵗?/p>

筆者用VB6.0編制了水文斷面機(jī)助制圖程序，程序設(shè)計流程圖、界面及部分源代碼見下圖。該程序通過讀取野外采集的縱斷面數(shù)據(jù)文件，自動計算和提取完成制圖所需的亙長和高程數(shù)據(jù)并寫成文件，然后完成縱斷面的繪制，并可通過對界面的操作來控制制圖的橫向比例尺及縱向比例尺。

2.1 程序設(shè)計整體流程

2.2 數(shù)據(jù)預(yù)處理

外業(yè)采集數(shù)據(jù)時有時一天可能采集多個轉(zhuǎn)角之間的斷面數(shù)據(jù)，本段程序主要就是根據(jù)已知的轉(zhuǎn)角坐標(biāo)、把外業(yè)采集的數(shù)據(jù)自動進(jìn)行分類，不同轉(zhuǎn)角耐張之間的數(shù)據(jù)生成一個文件。下面以一個耐張之間的數(shù)據(jù)簡單介紹一下：

首先把新建一個轉(zhuǎn)角坐標(biāo)文件，本例中命名為ZUO.TXT。運行程序的數(shù)據(jù)預(yù)處理，點擊原始數(shù)，在提示窗口中選擇外業(yè)采集的數(shù)據(jù)，本例中命名為斷面數(shù)據(jù).TXT。在點擊轉(zhuǎn)角數(shù)據(jù)，提示窗口中選擇已經(jīng)建好的ZUO.TXT。最后點擊預(yù)處理命令，生成數(shù)據(jù)文件如圖5，在點擊程序中的生成斷面數(shù)據(jù)命令，即生成數(shù)據(jù)文件如圖6。主要代碼如下：

3 結(jié)束語

本文以編制水文斷面繪圖程序為例探討了VB與AutoCAD的連接、繪制縱斷面的數(shù)據(jù)格式、數(shù)據(jù)轉(zhuǎn)換，以實現(xiàn)快速繪制縱斷面。如今，計算機(jī)科學(xué)的飛速發(fā)展和數(shù)字化測繪的日益普及，對我們測繪工作者也提出了更高的要求，如果測繪工作者能夠掌握一種編程語言，會對自己的工作大有裨益。而VB由于其簡單易學(xué)，功能強(qiáng)大，應(yīng)該成為我們測繪工作者學(xué)習(xí)編程語言的首選工具。

【參考文獻(xiàn)】

[1]段興.Visual Basic6.0控件實用程序設(shè)計100例[M].人民郵電出版社，2002，10.

[2]申石磊，季超.Visual Basic程序設(shè)計基礎(chǔ)[M].高等教育出版社，2010，03.

[責(zé)任編輯：薛俊歌]