窗口界面控制包括AutoCAD應(yīng)用程序窗口界面控制和AutoCAD繪圖窗口控制,以及VB窗口界面和AutoCAD窗口界面的相互切換。
利用AutoCAD應(yīng)用程序?qū)ο蟮膶傩裕梢钥刂苹虿樵傾utoCAD窗口界面的現(xiàn)實狀態(tài)。
acadapp.WindowState = acMax
acadapp.WindowState = acMin
acadapp.WindowState = acNorm
acadapp.Visible = False
上語句分別將AutoCAD窗口設(shè)置為最大、最小和一半狀態(tài),最后一句將AutoCAD窗口設(shè)置為不可見。
利用Document對象屬性可以控制或查詢AutoCAD繪圖窗口的現(xiàn)實狀態(tài)。
acadapp.ActiveDocument.Width = acadapp.Width / 2
acadapp.ActiveDocument.Height = acadapp.Height / 2
acadapp.ActiveDocument.WindowState = acMax
acadapp.ActiveDocument.WindowState = acMin
acadapp.ActiveDocument.WindowState = acNorm
上語句設(shè)置AutoCAD繪圖窗口的寬高為AutoCAD窗口界面的一半,設(shè)置AutoCAD的繪圖窗口顯示為最大、最小、一般狀態(tài)。
使用VB的AppActivate語句,可以實現(xiàn)VB程序界面切換到AutoCAD界面,語法如下。
AppActivate title(,wait)
參數(shù)title表示所要激活的應(yīng)用程序窗口標(biāo)題,wait表示在激活另外一個應(yīng)用程序之前調(diào)用的應(yīng)用程序是否具有焦點,如果為false,即使調(diào)用的應(yīng)用程序沒有焦點,也直接激活指定的應(yīng)用程序如果為true,則調(diào)用的應(yīng)用程序會在等到具有焦點后,才激活指定的應(yīng)用程序。
將VB程序窗口切換到AutoCAD界面語句如下。
AppActivate AcadApp.Caption
執(zhí)行該語句后,AutoCAD將獲得焦點,AutoCAD窗口界面的大小保持先前的狀態(tài),若AutoCAD窗口界面先前的狀態(tài)不為最小化,VB窗口將最小化,屏幕顯示AutoCAD窗口界面,若要重新使VB獲得焦點并顯示VB界面,單擊屏幕下方的最小化VB窗口即可。
相關(guān)文章
- 2021-07-18AutoCAD VBA開發(fā)手冊PDF下載
- 2021-07-18AutoCAD VBA開發(fā)人員手冊PDF下載
- 2021-07-16AutoCAD VBA開發(fā)精彩實例教程PDF下載
- 2021-07-16AutoCAD VBA函數(shù)庫查詢辭典PDF下載
- 2012-05-24AutoCAD VBA二次開發(fā)教程免費下載
- 2011-08-03AutoCAD VBA從入門到精通下載PDF版
- 2011-03-08基于VB的噴射泵零件CAPP
- 2011-01-11好用免費的鋼梯&欄桿自動生成器 autocad vba
- 2011-01-08圓法蘭生成器 cad vba