我想看一级黄色大片_久久亚洲国产精品一区二区_久久精品免视看国产明星_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久久青青青国产免费

            国产二区国产一区在线观看| 久久精品夜夜夜夜久久| 亚洲图片欧美一区| 亚洲免费资源在线播放| 国产精品视频第一区| 国产欧美精品一区二区色综合 | 色伊人久久综合中文字幕| 99久久亚洲一区二区三区青草| 国产成人在线影院| 成人激情视频网站| 不卡区在线中文字幕| 99精品视频一区| 日本韩国欧美三级| 51精品久久久久久久蜜臀| 精品欧美黑人一区二区三区| 精品精品国产高清a毛片牛牛| 久久色.com| 亚洲视频综合在线| 日韩成人精品视频| 九九精品一区二区| av电影天堂一区二区在线观看| 日本久久电影网| 制服丝袜av成人在线看| 欧美电影免费观看高清完整版在线 | 欧美一区二区精品在线| 久久亚洲精华国产精华液 | 国产一区免费电影| av电影在线观看完整版一区二区| 在线观看免费亚洲| 日韩免费性生活视频播放| 亚洲国产精品二十页| 亚洲成人av中文| 国产中文字幕一区| 91精彩视频在线| 欧美成人午夜电影| 亚洲欧美另类小说| 久久99国产精品久久| 97国产精品videossex| 欧美精品 国产精品| 国产亚洲综合在线| 首页国产欧美日韩丝袜| 国产福利一区二区三区| 色哦色哦哦色天天综合| 精品福利在线导航| 亚洲高清免费观看| 国产激情视频一区二区三区欧美| 欧美性视频一区二区三区| 久久久美女艺术照精彩视频福利播放| 亚洲人精品午夜| 国产资源精品在线观看| 欧洲av一区二区嗯嗯嗯啊| 国产欧美中文在线| 青草国产精品久久久久久| 99精品桃花视频在线观看| 日韩欧美在线综合网| 亚洲免费视频成人| 国产成人精品三级麻豆| 337p亚洲精品色噜噜噜| 一区二区三区四区激情| 国产成人在线视频网址| 91精品国产一区二区三区蜜臀| 国产精品久久久久久久久果冻传媒| 日产欧产美韩系列久久99| 一本高清dvd不卡在线观看| 国产色婷婷亚洲99精品小说| 麻豆国产一区二区| 欧美丰满少妇xxxbbb| 亚洲综合在线视频| 97久久精品人人做人人爽| 国产亚洲午夜高清国产拍精品 | 欧美日韩电影在线| 一区二区三区精品| 色哟哟在线观看一区二区三区| 国产精品天干天干在观线| 国产伦精品一区二区三区在线观看| 欧美理论片在线| 午夜视频一区在线观看| 欧美系列在线观看| 亚洲v中文字幕| 国产精品日产欧美久久久久| 韩国av一区二区三区在线观看| 日韩视频一区二区三区| 奇米色一区二区| 日韩三级av在线播放| 蜜桃av噜噜一区| 日韩精品一区二区三区swag| 精东粉嫩av免费一区二区三区| 精品国产免费一区二区三区香蕉 | 成人av资源在线| 国产精品伦一区| av亚洲精华国产精华精| 中文字幕在线一区| 91美女视频网站| 亚洲福利一区二区| 欧美一区日韩一区| 精品一区二区三区免费观看| 久久综合一区二区| 成人激情动漫在线观看| 亚洲欧美色图小说| 欧美日韩一区高清| 裸体一区二区三区| 国产亚洲欧美日韩在线一区| 成人aa视频在线观看| 亚洲裸体xxx| 777午夜精品免费视频| 久久99精品久久只有精品| 国产视频911| 欧美在线制服丝袜| 精品一区二区三区在线观看| 国产精品久久久久一区| 精品视频999| 国产麻豆精品久久一二三| 亚洲视频在线一区观看| 正在播放一区二区| 成人av电影在线观看| 日日骚欧美日韩| 国产精品视频免费| 欧美日韩国产综合一区二区| 国产一区二区三区免费看| 亚洲美腿欧美偷拍| 久久综合五月天婷婷伊人| 色婷婷久久久亚洲一区二区三区| 麻豆国产精品官网| 亚洲精品中文在线影院| 欧美变态口味重另类| 色婷婷综合久久| 国产乱码精品1区2区3区| 一个色妞综合视频在线观看| 久久嫩草精品久久久精品| 色婷婷综合久久| 国产另类ts人妖一区二区| 无吗不卡中文字幕| 亚洲欧美日韩国产综合| 久久日韩精品一区二区五区| 在线观看国产91| 大尺度一区二区| 蜜桃91丨九色丨蝌蚪91桃色| 亚洲最色的网站| 国产精品不卡视频| 欧美精品一区二区蜜臀亚洲| 欧美日韩激情一区二区三区| jlzzjlzz国产精品久久| 国产剧情av麻豆香蕉精品| 亚洲成人一区二区在线观看| 中文字幕一区二区三区色视频 | 日韩一级高清毛片| 欧美日韩一区二区三区视频| bt欧美亚洲午夜电影天堂| 麻豆精品一区二区综合av| 亚洲精品视频在线观看免费| 国产精品久久一卡二卡| 国产欧美精品一区二区色综合朱莉| 日韩一区二区三| 91精品国产一区二区三区香蕉| 欧美午夜片在线看| 日本精品裸体写真集在线观看| 99精品在线免费| 91在线云播放| 成人免费av资源| 国产白丝精品91爽爽久久| 国产一区二区精品久久| 久久91精品久久久久久秒播| 久久精品国产秦先生| 免费在线观看日韩欧美| 奇米影视一区二区三区小说| 奇米四色…亚洲| 国内精品久久久久影院薰衣草 | 亚洲色图.com| 亚洲男女毛片无遮挡| 亚洲黄色av一区| 亚洲四区在线观看| 亚洲免费观看高清完整版在线观看| 最近日韩中文字幕| 一区二区三区中文免费| 亚洲一区二区av电影| 日本伊人午夜精品| 国产永久精品大片wwwapp| 国产电影精品久久禁18| 不卡在线观看av| 在线观看视频一区二区| 欧美日韩高清在线播放| 欧美一卡2卡三卡4卡5免费| 精品久久久久久久人人人人传媒| 26uuu国产电影一区二区| 久久蜜桃香蕉精品一区二区三区| 国产亚洲欧美在线| 一区二区视频在线| 日本伊人精品一区二区三区观看方式| 免费观看日韩av| 高清成人免费视频| 欧美在线观看一区| 欧美电视剧在线观看完整版| 日本一区二区免费在线 | 首页综合国产亚洲丝袜| 精东粉嫩av免费一区二区三区| 国产精品亚洲一区二区三区妖精| 成人国产一区二区三区精品| 欧美日韩小视频| 欧美哺乳videos| 亚洲欧美中日韩|