問(wèn):有什么方式可以在AutoCAD啟動(dòng)的時(shí)候自動(dòng)加載VBA工程?
ku?_/-ko] E5 oD|'=WA 答:當(dāng)VBA加載時(shí)會(huì)在AutoCAD目錄下尋找一個(gè)名叫acad.dvb的工程。如果找到,就會(huì)自動(dòng)加載它。如果你想VBA和缺省工程在 AutoCAD啟動(dòng)的時(shí)候每次都加載,你需要在acad.rx文件中生成一個(gè)入?。VBA被設(shè)計(jì)成命令加載方式(在沒(méi)有激活一個(gè)VBA命令之前不占用任何 內(nèi)存和進(jìn)程)。為了總是加載VBA和acad.dvb工程,請(qǐng)?jiān)赼cad.rx文件中包含下列一行:
kDq%Y[6Z S=p u acadvba.arx
(OB8vTRXP YZRB4T9 在AutoCAD 2000中支持嵌入工程,這樣當(dāng)你打開(kāi)擁有嵌入工程的圖形文件時(shí)該工程就會(huì)自動(dòng)加載。所以定義嵌入工程也是一個(gè)很好的自動(dòng)加載VBA工程的辦法。
}yw;L(3 h<;[P?z 問(wèn):有辦法可以在AutoCAD啟動(dòng)時(shí)自動(dòng)運(yùn)行一個(gè)VBA例程或宏嗎?
LFyceFbm ~ fEs!hl h&bV!M 答:當(dāng)然。你可以從AutoCAD的acad.lsp文件的啟動(dòng)功能中通過(guò)VBARUN的命令行版本運(yùn)行一個(gè)工程中的宏。首先,你需要準(zhǔn)備 acad.dvb文件以便自動(dòng)加載。以drawline.dvb作為例子,用VBALOAD命令彈出VBA IDE對(duì)話框。然后用VBA IDE保存為菜單命令保存此工程為新的名字acad.dvb。下一步,激活notepad.exe并且建立或添加下列行到acad.lsp文件中:
Qiw4'xQm TEyx((SK (defun S::STARTUP() (command "_-vbarun" "drawline"))
yrAzD= "5:f{GfO#v 問(wèn): AutoCAD支持VBA多工程的打開(kāi)嗎?
k{jw%a<Sc c)MR+'d\WO 答:在2000中支持。但在14版中尚不支持。
1:zu$|%7 i8_x1=A 問(wèn):我可以加密我的VBA模塊代碼嗎?
jHH zL'IN)7MU 答:雖然VBA不支持可執(zhí)行文件的創(chuàng)建,但是它確實(shí)在一個(gè)工程的基礎(chǔ)上提供了口令保護(hù)工程窗體、類和模塊可見(jiàn)性的功能。你可以發(fā)現(xiàn)這個(gè)工程保護(hù)功能在VBA IDE菜單中。選擇 工具 > 工程屬性 > 保護(hù)。如下圖所示:
@z)tC@ ZT8Ji?_n 1lyOp 問(wèn):在VBA中如何在命令行上提示?
:ZS8Zm" G.nftp(*} 答:有一些方法允許在命令行提示輸入以獲取數(shù)據(jù)。這些方法以“GET”開(kāi)頭。你可以發(fā)現(xiàn)決大多數(shù)的方法(如果不是全部的話)通過(guò)對(duì)象瀏覽器搜索 AutoCAD類型庫(kù)。啟動(dòng)VBA IDE。擊F2功能鍵或者從視圖菜單中選擇對(duì)象瀏覽器。?對(duì)象瀏覽器窗口中使用庫(kù)范圍下拉列表把缺省的<所有庫(kù)>改成AutoCAD。庫(kù)列表 下面的編輯列表框是用來(lái)搜索的。輸入GET到那個(gè)編輯列表框中并且敲回車鍵。包含“GET”的類和成員函數(shù)就會(huì)顯示在滾動(dòng)列表中。AcadUtility 的一些成員函數(shù)可以?命令行上提示用戶輸入。如下圖所示:
nFnF_ Hu8atlpo 問(wèn):我怎樣從AutoCAD菜單中激活一個(gè)VBA例程?
d[e:}1 k(z<Bm 答:你需要編輯菜單和添加VBARUN模塊子例程。首先確認(rèn)正確的VBA工程已經(jīng)加載。
4c[)}8\ 問(wèn):我怎樣從AutoCAD菜單中啟動(dòng)一個(gè)VBA對(duì)話框(窗體)?
1