我想看一级黄色大片_久久亚洲国产精品一区二区_久久精品免视看国产明星_91久久青青青国产免费

您的位置:網站首頁 > CAD教程 > CAD教程文章

cad二次開發中VB或VBA的應用問題

時間:2008-08-14 11:51:47 來源:
1、如何在 VB 中連接 AutoCAD。
啟動 VB ,引用 AutoCAD 類型庫。操作步驟:從“工程”菜單中選擇“引用”選項,啟動“引用”對話框。在“引用”對話框中,選擇 AutoCAD 類型庫,然后單擊“確定”。

定義模塊級變量 AutoCAD 應用程序 (acadApp) 和當前的文檔 (acadDoc)。
如果 AutoCAD 正在運行,使用 GetObject 函數將檢索 AutoCAD Application 對象。如果 AutoCAD 沒有運行,使用 CreateObject 函數試圖創建一個 AutoCAD Application 對象。如果創建成功,會啟動 AutoCAD;如果失敗,則會發生錯誤。
同時運行多個 AutoCAD 任務時,GetObject 函數會返回 Windows 運行對象表中的第一個 AutoCAD 實例。
要顯示 AutoCAD 圖形窗口,需要將 AutoCAD 應用程序的 Visible 特性設置為 TRUE。
使用 acadDoc 變量引用當前的 AutoCAD 圖形。
示例:
Dim acadApp As AcadApplication
Dim acadDoc as AcadDocument
Sub ConnectToAcad()

On Error Resume Next
Set acadApp = GetObject(, "AutoCAD.Application")
If Err Then
Err.Clear
Set acadApp = CreateObject("AutoCAD.Application")
If Err Then End
End If
acadApp.Visible = True
Set acadDoc = acadApp.ActiveDocument
End Sub

2、如何使 VB 開發的程序不依賴于 AutoCAD 的版本。
啟動 VB ,定義模塊級變量 AutoCAD 應用程序 (acadApp) 和當前的文檔 (acadDoc)。
如果 AutoCAD 正在運行,使用 GetObject 函數將檢索 AutoCAD Application 對象。如果 AutoCAD 沒有運行,使用 CreateObject 函數試圖創建一個 AutoCAD Application 對象。如果創建成功,會啟動 AutoCAD;如果失敗,則會發生錯誤。
同時運行多個 AutoCAD 任務時,GetObject 函數會返回 Windows 運行對象表中的第一個 AutoCAD 實例。
要顯示 AutoCAD 圖形窗口,需要將 AutoCAD 應用程序的 Visible 特性設置為 TRUE。
使用 acadDoc 變量引用當前的 AutoCAD 圖形。
示例:
Dim acadApp As Object
Dim acadDoc as Object
Sub ConnectToAcad()

On Error Resume Next
Set acadApp = GetObject(, "AutoCAD.Application")
If Err Then
Err.Clear
Set acadApp = CreateObject("AutoCAD.Application")
If Err Then End
End If
acadApp.Visible = True
Set acadDoc = acadApp.ActiveDocument
End Sub
與第一個問題相比較,可以看出,不引用具體的類型庫以及使用通用的對象類型就可以達到通用性。

3、前期綁定和后期綁定
要創建一個使用前期綁定方式的對象變量,也就是說,在程序編譯時就完成綁定,則對象變量在聲明時應指定類 ID,如:Dim acadApp As AcadApplication。
使用 As Object 子句聲明對象變量,可以創建一個能包含任何類型對象引用的變量。不過,該變量訪問對象是后期綁定的,也就是說,綁定在程序運行時才進行,如:Dim acadApp As Object。
前期綁定的變量引用可以提供更好的性能,但該變量只能存放聲明中所指定的類的引用。
而后期綁定的變量引用可以提供更好的通用性。

4、依賴于版本和獨立于版本
如果 CreateObject 或 GetObject 函數使用的 ProgID 沒有附加版本號,那么是獨立于版本的,否則是依賴于版本的。例如,如果使用的是 CreateObject,則 CreateObject ("AutoCAD.Application") 是獨立于版本的,而 CreateObject ("AutoCAD.Application.15") 是依賴于版本的。

5、VB 代碼到 VBA 代碼的轉換
在 VBA 的 IDE 環境中,使用“導入文件”將要轉換的 VB 工程的模塊、類模塊以及窗體文件一一導入。接著將 VB 代碼中所有的當前的文檔 (acadDoc) 變量替換為 ThisDrawing,而AutoCAD 應用程序 (acadApp) 變量替換為 Application。同時刪除定義的 AutoCAD 應用程序 (acadApp) 和當前的文檔 (acadDoc) 變量,刪除與 AutoCAD 應用程序連接的代碼。注意:要轉換 VB 代碼的窗體部分,則窗體必須是用 UserForm 創建的。

6、圖形對象和非圖形對象
圖形對象(也稱為圖元、實體對象)是組成圖形的可見對象(例如直線、圓、光柵圖像等)。非圖形對象是指屬于圖形的一部分但不可見的(提示性的)對象,例如 Layers、 Linetypes、 DimStyles、 SelectionSets 等等。要創建這些對象,可使用 Add 方法。每一個對象都有用于特定目的的方法和特性,都有設置和檢索擴展數據以及刪除自己的方法。#p#分頁標題#e#

我想看一级黄色大片_久久亚洲国产精品一区二区_久久精品免视看国产明星_91久久青青青国产免费

            91.麻豆视频| 欧美精品高清视频| 国产精品一线二线三线精华| 中文字幕在线视频一区| 久久久国产精品午夜一区ai换脸| 精品国产乱码久久久久久浪潮| 99久久99精品久久久久久 | 麻豆精品国产传媒mv男同| 综合网在线视频| 亚洲午夜久久久久久久久久久| 日韩av在线发布| 国内国产精品久久| 亚洲狠狠爱一区二区三区| 国产成人福利片| 欧美天天综合网| 777奇米四色成人影色区| 中文字幕在线不卡国产视频| 夜夜亚洲天天久久| 秋霞午夜av一区二区三区| 捆绑调教美女网站视频一区| 精品制服美女久久| 精品成人佐山爱一区二区| 色噜噜狠狠色综合欧洲selulu| 在线这里只有精品| 精品少妇一区二区三区日产乱码| 日韩欧美国产午夜精品| 亚洲视频一区在线观看| 日本成人在线网站| 国产精品亚洲午夜一区二区三区| 99久久精品国产毛片| 欧美一区二区高清| 国产精品69毛片高清亚洲| 欧美日韩国产高清一区二区| 国产精品国产三级国产普通话蜜臀 | 久久精品一区八戒影视| 亚洲电影在线免费观看| 大陆成人av片| 亚洲一区二区在线免费看| 成人免费观看视频| 欧洲一区在线电影| 亚洲男人天堂av网| 福利一区福利二区| 亚洲成人精品影院| 91伊人久久大香线蕉| 日本一区二区三区在线不卡| 国产人成亚洲第一网站在线播放 | 日韩精品中文字幕一区| 婷婷综合在线观看| 久久综合给合久久狠狠狠97色69| 国产91精品在线观看| 亚洲欧洲99久久| 91精品国产综合久久香蕉的特点| 蜜臀91精品一区二区三区| 国产精品午夜免费| 在线中文字幕一区| 国产99精品国产| 亚洲成a人v欧美综合天堂下载| 日韩欧美电影一区| 日韩精品在线看片z| 国产日韩欧美亚洲| 亚洲va欧美va人人爽| 国产精品全国免费观看高清| 亚洲精选在线视频| 99re成人精品视频| 欧美性一二三区| 久久综合资源网| 久久99精品久久久久久国产越南 | 成人av资源下载| 国产喷白浆一区二区三区| 国产99久久久久| 欧美久久一二三四区| 亚洲欧美一区二区视频| 久久精品国产99| 国产精品久久久久久久久免费相片 | 一区视频在线播放| 91麻豆精品国产无毒不卡在线观看 | 亚洲最大的成人av| 久久99国产精品麻豆| 一区二区三区四区av| 欧美视频精品在线观看| 性做久久久久久久免费看| 欧美日本一道本在线视频| 麻豆91在线观看| 中文字幕亚洲精品在线观看| 日韩免费视频一区| 国产精品久久综合| 五月婷婷欧美视频| 精品少妇一区二区三区视频免付费| 亚洲国产欧美日韩另类综合 | 欧美人狂配大交3d怪物一区| 欧美日韩一区二区三区在线看 | 高清在线成人网| 91国产成人在线| 日本美女一区二区三区视频| 91精品国产综合久久香蕉的特点| 国产又黄又大久久| 亚洲午夜久久久久久久久电影院| 亚洲一区国产视频| 国产清纯在线一区二区www| 日韩一级二级三级| 国产欧美日韩综合精品一区二区| 久久这里只有精品6| 国产免费成人在线视频| 91福利在线看| 国产精品456露脸| 亚洲成人黄色小说| 夜夜操天天操亚洲| 亚洲成av人**亚洲成av**| 男男视频亚洲欧美| 亚洲第一在线综合网站| 亚洲免费观看在线视频| 欧美成人艳星乳罩| 欧美国产精品一区二区| 亚洲精品乱码久久久久久| 日韩制服丝袜av| 午夜精品影院在线观看| av资源网一区| 国产高清精品在线| 亚洲自拍偷拍图区| 欧美a一区二区| 韩国v欧美v亚洲v日本v| 一区二区高清免费观看影视大全| 肉肉av福利一精品导航| 亚洲国产精品传媒在线观看| 青草国产精品久久久久久| 高清国产一区二区| 中文字幕一区二区不卡| 国产亚洲欧美日韩俺去了| 精品国产乱码久久久久久免费 | 蜜桃传媒麻豆第一区在线观看| 午夜久久久影院| 日本高清不卡一区| 精品久久久久久久久久久院品网| 国产精品久久久一区麻豆最新章节| 亚洲欧美另类久久久精品2019| 亚洲午夜激情网站| 成人精品电影在线观看| 一区免费观看视频| 亚洲午夜免费视频| 成人免费毛片a| 欧美日韩激情一区二区| 亚洲欧美在线观看| 成人av网在线| 久久精品欧美一区二区三区不卡 | 亚洲精品高清视频在线观看| 国产91在线观看丝袜| 久久精品人人爽人人爽| 韩国三级中文字幕hd久久精品| 欧美三级电影网| 国产亚洲成av人在线观看导航| 麻豆精品在线视频| 欧美一区三区四区| 555www色欧美视频| 欧美在线观看一二区| 亚洲午夜私人影院| 国产日韩三级在线| 久久久久久久久久久久电影| 精品国产成人在线影院| 日本va欧美va欧美va精品| 91激情五月电影| 欧美精品在线一区二区三区| 免费观看在线色综合| 欧美精品一区二区三区一线天视频| 久久精品二区亚洲w码| 亚洲欧美怡红院| 精品国产乱码久久久久久久 | 亚洲国产乱码最新视频 | 国产在线视频一区二区三区| 亚洲一区欧美一区| 国产日产欧美一区| 亚洲欧美经典视频| 6080午夜不卡| 高清在线成人网| 亚洲国产另类精品专区| 欧美午夜精品理论片a级按摩| 91亚洲资源网| 日韩一区二区三区在线| 国产美女久久久久| 免费欧美高清视频| 免费观看91视频大全| 美女精品自拍一二三四| 成人高清视频免费观看| 成人激情小说网站| 色狠狠桃花综合| 亚洲欧洲日产国码二区| 欧美一区二区三区在| 秋霞午夜鲁丝一区二区老狼| 国产精品每日更新| 中文字幕+乱码+中文字幕一区| 中文字幕av资源一区| 精品福利一二区| 亚洲精品免费播放| 99精品国产视频| 欧美精品视频www在线观看| 3atv一区二区三区| 国产精品萝li| 免费在线观看成人| 在线欧美日韩精品| 日韩免费看的电影| 亚洲欧洲成人av每日更新|