【正文】 統(tǒng)的圖形用戶界面（ Graphic User Interface, GUI）的方法，它與其他編程軟件不同的是不需要編寫(xiě)大量代碼去描述界面元素的外觀和位置，只要把預(yù)先建立好的對(duì)象拖放到屏幕上相應(yīng)的位置即可。應(yīng)該說(shuō)，這是一次質(zhì)的飛躍，是一次編程技術(shù)的革命。 Basic 實(shí) 際 上 是 一 個(gè) 短 語(yǔ) 的 縮 寫(xiě) ， 這 個(gè) 短 語(yǔ) 就 是 Beginners39。 AllPurpose Symbolic Instruction Code ，其中文意思為 “ 初學(xué)者通用符號(hào)指令代碼 ” 。 VB 的發(fā)展歷史 Visual Basic 從 1991 年誕生以來(lái)，現(xiàn)在已經(jīng) 20 年了。 BASIC 是微軟的起家產(chǎn)品，微軟當(dāng)然不忘了這位 功臣。隨著每一次微軟技術(shù)的浪潮， Visual Basic 都會(huì)隨之獲得新生?？梢灶A(yù)見(jiàn)，將來(lái)無(wú)論微軟又發(fā)明了什么技術(shù)或平臺(tái)， Visual Basic 一定會(huì)首先以新的姿態(tài)登上去的。如果你想緊跟微軟，永遠(yuǎn)在最新的技術(shù)上最快速地開(kāi)發(fā)，你就應(yīng)該選擇 Visual Basic。 1991 年，美國(guó)微軟公司推出了 Visual Basic 。 由于 Windows 的推出， Windows 已經(jīng)充分獲得了用戶的認(rèn)可， Windows開(kāi)發(fā)也進(jìn)入一個(gè)新的時(shí)代。 Visual Basic 的功能過(guò)于簡(jiǎn)單，相對(duì)于Windows 的強(qiáng)大功能沒(méi)有發(fā)揮出來(lái)。所以，微軟在 1992年推出了新版本Visual Basic 。 Visual Basic 推出沒(méi)幾個(gè)月，微軟就發(fā)布了新版本的 Visual Basic 第 8 頁(yè) 共 65 頁(yè) ，可以看出 VB 這時(shí)候旺盛的生命力。 1997 年，微軟推出了 Visual Basic ，這個(gè)版本的重要性幾乎和 一樣高。 Visual Basic 的 IDE 支持 “ 智能感知 ” ，這是一項(xiàng)非常方便開(kāi)發(fā)者的功能，可以不必記住很長(zhǎng)的成員名稱(chēng)和關(guān)鍵字，只要按 “.” ，想要的東西統(tǒng)統(tǒng)彈出來(lái)。 1998企業(yè)真正高效 的源泉 —— Visual Basic 。 2021第三次革命性變化，向 .NET 進(jìn)軍 —— Visual 2021。 2021穩(wěn)中求變的新版本 —— Visual 2021。 2021完美主義的 Visual Basic—— Visual Basic .NET 2021，能否再現(xiàn)輝煌 ？ 2021功能極強(qiáng)且最易用的 Visual Basic—— Visual 2021。 2021Visual 2021。 VB 的特點(diǎn) 1． 面向?qū)ο? VB采用了面向?qū)ο笤O(shè)計(jì)思想，它基本思路是把復(fù)雜的設(shè)計(jì)問(wèn)題分解為多個(gè)能夠完成獨(dú)立功能且相對(duì)簡(jiǎn)單的對(duì)象集合。所謂 “ 對(duì)象 ” 就是個(gè)可操作實(shí)體如窗體、窗體中命令按鈕、標(biāo)簽、文本框等，面向?qū)ο缶幊叹褪侵赋绦騿T可根據(jù)界面設(shè)計(jì)要求直接在界面上設(shè)計(jì)出窗口、菜單、按鈕等類(lèi)型對(duì)象并為每個(gè)對(duì)象設(shè)置屬性。 在 VB. NET 2021 和之后的版本， VB 是完全支持面向?qū)ο蟮木幊陶Z(yǔ)言；而對(duì)于早期版本（ 版和之前的版本），只能稱(chēng)作是基于對(duì)象的編程語(yǔ)言，原因是它不支持類(lèi)的繼承。 2．事件驅(qū)動(dòng) 在 Windows 環(huán)境下是以事件驅(qū) 動(dòng)方式運(yùn)行每個(gè)對(duì)象的都能響應(yīng)多個(gè)區(qū)別事件，每個(gè)事件都能驅(qū)動(dòng)段代碼事件過(guò)程，該代碼決定了對(duì)象功能。通常稱(chēng)這種機(jī)制為事件驅(qū)動(dòng)的編程機(jī)制?？捎捎脩舨僮饔|發(fā)也可以由系統(tǒng)或應(yīng)用觸發(fā)例如單擊個(gè)命令按鈕就觸發(fā)了按鈕 Click(單擊 )事件該事件中代碼就會(huì)被第 9 頁(yè) 共 65 頁(yè) 執(zhí)行，若用戶未進(jìn)行任何操作 (未觸發(fā)事件 )則就處于等待狀態(tài)整個(gè)應(yīng)用就是由彼此獨(dú)立事件過(guò)程構(gòu)成。 3．軟件 Software 集成式開(kāi)發(fā) VB為編程提供了個(gè)集成開(kāi)發(fā)環(huán)境，在這個(gè)環(huán)境中編程者可設(shè)計(jì)界面、編寫(xiě)代碼、調(diào)試直至把應(yīng)用編譯成可在 Windows 中運(yùn)行的可執(zhí)行文件，并為它生成 安裝 VB 集成開(kāi)發(fā)環(huán)境，為編程者提供了很大方便。 4．結(jié)構(gòu)化設(shè)計(jì)語(yǔ)言 VB具有豐富 數(shù)據(jù)類(lèi)型是種符合結(jié)構(gòu)化設(shè)計(jì)思想語(yǔ)言而且簡(jiǎn)單易學(xué) 。 5．強(qiáng)大數(shù)據(jù)庫(kù)訪問(wèn)功能 VB利用數(shù)據(jù) Control 控件可以訪問(wèn)多種數(shù)據(jù)庫(kù) VB 6． O 提供 ADOControl控件不但可以用最少代 碼實(shí)現(xiàn)數(shù)據(jù)庫(kù)操作和控制也可以取代 DataControl控件和 RDOControl 控件 。 6．支持對(duì)象鏈接和嵌入技術(shù) VB 核心是對(duì)對(duì)象鏈接和嵌入 (OLE)技術(shù)支持它是訪問(wèn)所有對(duì)象種思路方法利用 OLE 技術(shù)能夠開(kāi)發(fā)集聲音、圖像、動(dòng)畫(huà)、字處理、 Web 等對(duì)象 于一體的功能強(qiáng)大的軟件 。 7．網(wǎng)絡(luò)功能 VB 提供了 DltTML 設(shè)計(jì)工具利用這種技術(shù)可以動(dòng)態(tài)創(chuàng)建和編輯 Web頁(yè)面使用戶在 VB 中開(kāi)發(fā)多功能網(wǎng)絡(luò)應(yīng)用軟件 Software。 8．多個(gè)應(yīng)用向?qū)? VB提供了多種向?qū)鐟?yīng)用向?qū)?、安裝向?qū)?、?shù)據(jù)對(duì)象向?qū)Ш蛿?shù)據(jù)窗體向?qū)ㄟ^(guò)它們可以快速地創(chuàng)建區(qū)別類(lèi)型、區(qū)別功能應(yīng)用 。 9．支持動(dòng)態(tài)交換、動(dòng)態(tài)鏈接技術(shù) 通過(guò)動(dòng)態(tài)數(shù)據(jù)交換 (DDE)編程技術(shù) VB開(kāi)發(fā)應(yīng)用能和其他 Windows 應(yīng)用的間建立數(shù)據(jù)通信通過(guò)動(dòng)態(tài)鏈接庫(kù)技術(shù)在 VB中可方便地用 C語(yǔ)言或匯編語(yǔ)言編寫(xiě)也可 Windows 應(yīng)用接 口 。 10．聯(lián)機(jī)幫助功能 在 VB 中利用幫助菜單和 F1 功能鍵用戶可隨時(shí)方便地得到所需要幫助信息 VB 幫助窗口中顯示了有關(guān)舉例代碼通過(guò)復(fù)制、粘貼操作可獲取大量舉例代第 10 頁(yè) 共 65 頁(yè) 碼為用戶學(xué)習(xí)和使用提供方便 。 4 基于 VB 的 AutoCAD的二次開(kāi)發(fā) 第 11 頁(yè) 共 65 頁(yè) VB 對(duì) AutoCAD 開(kāi)發(fā)的原理 AutoCAD 具有強(qiáng)大的圖形處理功能，可以說(shuō)是當(dāng)今國(guó)內(nèi)外最為流行的計(jì)算機(jī)輔助繪圖程序，但為了更好地開(kāi)發(fā)用戶定制系統(tǒng)就需要對(duì) AutoCAD 進(jìn)行二次開(kāi)發(fā)。由于 AutoCAD R14 以前的版本 提供的二次開(kāi)發(fā)工具 AutoLISP 比較繁瑣，限制了 AutoCAD 的二次開(kāi)發(fā)。而 VB支持強(qiáng)大的 DDE 功能和 ActiveX 技術(shù)，提供了在 Windows 操作系統(tǒng)下開(kāi)發(fā)功能強(qiáng)大的應(yīng)用程序的最快最簡(jiǎn)單的途徑。 DDE 技術(shù) DDE（ Dynamic Data Exchange 動(dòng)態(tài)數(shù)據(jù)交換）是 windows 操作系統(tǒng)支持的機(jī)制，它允許兩個(gè)應(yīng)用程序相互動(dòng)態(tài)交換數(shù)據(jù)進(jìn)行對(duì)話。初始化會(huì)話的應(yīng)用程序?yàn)槟繕?biāo)（客戶），響應(yīng)目標(biāo)的應(yīng)用程序稱(chēng)為源（服務(wù)器）。兩個(gè)應(yīng)用程序之間進(jìn)行動(dòng)態(tài)數(shù)據(jù)交換，實(shí)際上是在它們之間建立了一條數(shù)據(jù)通 道，在一個(gè)對(duì)話中，客戶是主動(dòng)的，服務(wù)器響應(yīng)客戶的要求。一個(gè)應(yīng)用程序可以同時(shí)參與幾個(gè)會(huì)話，在一些會(huì)話中成為目標(biāo)，在另一些會(huì)話中成為源。一個(gè)應(yīng)用程序成為目標(biāo)或源，沒(méi)有特殊的差別，只是所擔(dān)的任務(wù)的不同。 VB中能和其它 Windows 應(yīng)用程序建立 DDE 通道的鏈接控件有文本框、標(biāo)簽和圖片框。通過(guò)設(shè)置鏈接控件的如下屬性值來(lái)建立和 AutoCAD 的鏈接關(guān)系。 Active Automation 技術(shù) ActiveX 技術(shù)來(lái)源于 OLE(Object Linking and Embedding)技術(shù)。 OLE 最初是對(duì) 象鏈接與嵌入，后來(lái)發(fā)展成為復(fù)合文檔技術(shù)。 OLE 自動(dòng)化技術(shù)擴(kuò)充和發(fā) 展為 ActiveX Automation， 它適 用于 OLE 對(duì) 象與 ActiveX 對(duì) 象。Automation 技術(shù)允許一個(gè)應(yīng)用程序操縱在另一個(gè)應(yīng)用程序中實(shí)現(xiàn)的對(duì)象，從而可以被操縱。操縱程序被稱(chēng)為客戶，而被操縱程序稱(chēng)為服務(wù)器，被操縱的對(duì)象是 ActiveX 對(duì)象。 ActiveX Automation 由客戶程序和服務(wù)器程序組成，客戶程序是操縱者與控制者，服務(wù)器程序是被控制者，它包含了一系列的暴露對(duì)象。只要服務(wù)器程序提供一定的接口，可以使任何對(duì)象實(shí) 現(xiàn)自動(dòng)化。對(duì)象包含了一些外部接口，它們被稱(chēng)為方法與屬性。方法是自動(dòng)化對(duì)象的一些函數(shù)，它們是提供給客戶程序的外部公共成員函數(shù)。屬性是一個(gè)對(duì)象的一些命名特征，即對(duì)象的一些公有數(shù)據(jù)域。 Automation 服務(wù)器和客戶之間數(shù)據(jù)傳第 12 頁(yè) 共 65 頁(yè) 遞的安全機(jī)制比較復(fù)雜，它一般使用 Variant 類(lèi)型傳遞數(shù)據(jù)，它支持許多標(biāo)準(zhǔn)數(shù)據(jù)類(lèi)型。 AutoCAD R14 新增的 Active Automation 技術(shù)為 AutoCAD 的二次開(kāi)發(fā)提供了新的途徑。 Active Automation 是一種面向?qū)ο蟮慕忉屝偷拈_(kāi)發(fā)工具，它在兩個(gè)應(yīng)用程序的內(nèi)部對(duì) 象進(jìn)行。允許對(duì)象之間通過(guò)一定的接口相互通訊，并以客戶 /服務(wù)器的方式進(jìn)行控制。具體對(duì)于用 VB開(kāi)發(fā) AutoCAD R14 這一環(huán)節(jié)而言， Active Automation 技術(shù)使得 AutoCAD 被登陸一個(gè) VB 可以訪問(wèn)的對(duì)象，用戶可以訪問(wèn) AutoCAD 所有的圖形對(duì)象和非圖形對(duì)象。 為了使用 AutoCAD 的 Automation 對(duì)象，必須首先在 Visual Basic 中引用該對(duì)象類(lèi)型庫(kù) ，方法是： 選擇“項(xiàng)目”中的“添加引用”菜單。(對(duì) 是“工程 \引用”菜單 )。在對(duì)話框中選擇“ AutoCAD 2021Type Library” 如圖： 圖 1 引用 AutoCAD 類(lèi)型庫(kù) VB總共可以取得 AutoCAD 約 70 個(gè)對(duì)象，這些對(duì)象共有 500 多個(gè)方法和屬性： 第 13 頁(yè) 共 65 頁(yè) 圖 2 Active Automation 對(duì)象模型 第 14 頁(yè) 共 65 頁(yè) 1． Application 對(duì)象有許多屬性和方法 （ 1） ActiveDocument 屬性返回當(dāng)前文檔，即 AutoCAD 正在進(jìn)行編輯的圖形； （ 2） Preferences 屬 性 返 回 Preferences 對(duì) 象 ， 該 對(duì) 象 等 價(jià) 于Preferences 對(duì)話框，用于 AutoCAD 的設(shè)置。 （ 3） WindowLeft， WindowTop， Width， Height 可以控制 AutoCAD 窗口的位置和大小； （ 4） 同時(shí) Application 對(duì)象能夠查詢、加載和卸載 ARX 應(yīng)用程序，對(duì)應(yīng)的函數(shù)分別是 ListARX， LoadARX 和 UnloadARX。 如果應(yīng)用程序想關(guān)閉 AutoCAD，可調(diào)用 Quit 方法。 2． Document 對(duì)象 Document 對(duì)象是 AutoCAD 當(dāng)前編輯的圖形，它可以存取所有的 AutoCAD圖形與非圖形對(duì)象。 ModelSpace 和 PaperSpace 屬性可存取圖形對(duì)象，而非圖形對(duì)象可以通過(guò) DimStyles， Layers， LineTypes， TestStyles， ViewPorts和 Views 等存取。 Document 對(duì)象方法有文件的存儲(chǔ)與打開(kāi)，文件輸入與輸出可使用 Export與 Import 方法，塊的磁盤(pán)存儲(chǔ)可使用 WBlocks 方法。 另外管理 AutoCAD 系統(tǒng)變量的兩個(gè)方法也屬于 Document 對(duì)象，即獲得系統(tǒng)變量當(dāng)前值 GetVariable 和設(shè)置當(dāng)前系統(tǒng)變量 SetVariable。 3．圖形對(duì)象 AutoCAD 中的圖形對(duì)象也被稱(chēng)為實(shí)體，是圖形的可見(jiàn)對(duì)象。包括 Lines， Arcs， PolyLines， Dims， 3DFaces， Raster Imsages 等等。可以使用ModelSpace 和 PaperSpace 的 Add[EntityName] 方法產(chǎn)生一個(gè)新的圖形對(duì)象，例如產(chǎn)生一個(gè)圓可以用 AddCircle 方法。 圖形對(duì)象的編輯可以通過(guò)圖形對(duì)象自身的方法實(shí)現(xiàn)。這些方法和AutoCAD 的編輯命令相對(duì)應(yīng)，例如 ArrayPolar， Copy， Erase， HighLight，Mirror， Move， Rotate 和 Offset。一些 圖形對(duì)象的典型特征可以通過(guò)對(duì)象屬性進(jìn)行修改，例如 Color， LineType 和 Layer 等，另外一些特殊的屬性依賴于對(duì)象類(lèi)型，例如 Radius， Center第 15 頁(yè) 共 65 頁(yè) 和 Area 等。 4．非圖形對(duì)象 非圖形對(duì)象是指圖形中的不可見(jiàn)對(duì)象，包括 DimStyle， Layer， LineType，TextStyles， View， Viewport 和 SelectionSet 等。產(chǎn)生一個(gè)新的非繪圖對(duì)象可以用它們對(duì)應(yīng)父類(lèi)的 Add 方法。它們的父類(lèi)是 Document 對(duì)象的對(duì)象集合。它們的修改與查詢是通過(guò)調(diào)用自身的屬性，同時(shí)這些對(duì)象都能查詢和設(shè)置施展數(shù)據(jù) XData。 5． Preferences， Plot 和 Utility 對(duì)象 Preferences 對(duì)象可以查詢和設(shè)置 Preference 對(duì)話框。它的屬性包括文件設(shè)置、性能設(shè)置、顯示設(shè)置、打印設(shè)置和兼容性等許多方面。 Plot 對(duì)象是 Document 對(duì)象的子對(duì)象，它主要進(jìn)行打印管理與設(shè)置。 Utility 對(duì)象也是 Document 對(duì)象的子對(duì)象，它的主要功能是進(jìn)行交互輸入和類(lèi)型轉(zhuǎn)換。 6