以下都是這些天研究布局的成果（能力有限導(dǎo)致認(rèn)識(shí)有限，包涵）

    我目前是先激活某個(gè)圖紙空間（布局），然后再增加圖元，但是當(dāng)圖紙比較大的時(shí)候，重生成模型的時(shí)候比較長。那能不能不激活圖紙空間，就能直接在某個(gè)布局中寫入圖元？

我目前代碼：

    Dim Textlayout As Object
    Set Textlayout = ThisDrawing.Layouts.Item(layoutItemI)

    ThisDrawing.ActiveLayout = Textlayout

里面layoutItemI是我傳入的一個(gè)參數(shù)。就是能不能不用激活（ThisDrawing.ActiveLayout = Textlayout），用某個(gè)方法吧圖元增加到不激活圖紙空間。（很遺憾沒有找到方法）

目前的認(rèn)識(shí)一：只有先激活某個(gè)圖紙空間，才能在里面增加圖元（但是可以修改圖元，我目前在布局中插入頁碼就是用這個(gè)方法）

------------------------------------------------

修改1：認(rèn)識(shí)一是錯(cuò)的。因?yàn)榭梢圆患せ钅硞€(gè)圖紙空間而在里面增加圖元

如下：

Sub tt()
Dim blkdef As AcadBlock
Set blkdef = ThisDrawing.Layouts.Item("布局1").Block
Dim pt1(2) As Double, pt2(2) As Double
pt2(0) = 10
blkdef.AddLine pt1, pt2
End Sub

    當(dāng)圖紙比較大的時(shí)候，重生成模型的時(shí)候比較長，那能不能點(diǎn)擊布局選項(xiàng)卡的時(shí)候讓他不重生成模型呢？

    于是找CAD系統(tǒng)變量，看有沒有什么變量能夠控制它，找到了LAYOUTREGENCTL變量，摘錄如下

LAYOUTREGENCTL
類型: 整數(shù)
保存位置: 注冊(cè)表
初始值: 2
指定“模型”選項(xiàng)卡和布局選項(xiàng)卡中的顯示列表的更新方式。 對(duì)于每個(gè)選項(xiàng)卡，更新顯示列表的方法可以是切換到該選項(xiàng)卡時(shí)重生成圖形，也可以是切換到該選項(xiàng)卡時(shí)將顯示列表保存到內(nèi)存并只重生成修改的對(duì)象。 修改 LAYOUTREGENCTL 設(shè)置可以提高性能。
0 每次切換選項(xiàng)卡都會(huì)重生成圖形。
1 當(dāng)在當(dāng)前“模型”選項(xiàng)卡和上一個(gè)布局選項(xiàng)卡之間切換時(shí)，顯示列表將被保存到內(nèi)存中并禁止對(duì)它們進(jìn)行重生成。 對(duì)于其他所有的布局選項(xiàng)卡，切換到它們時(shí)仍然進(jìn)行重生成。
2 第一次切換選項(xiàng)卡時(shí)會(huì)重生成圖形。 對(duì)于繪圖任務(wù)中的其余選項(xiàng)卡，顯示列表保存到內(nèi)存，切換到這些選項(xiàng)卡時(shí)禁止重生成。
修改 LAYOUTREGENCTL 設(shè)置得到的性能取決于若干個(gè)因素，包括圖形大小和類型、包含在圖形中的對(duì)象、可用內(nèi)存容量以及其他打開的圖形或應(yīng)用程序的影響。 LAYOUTREGENCTL 設(shè)置為 1 或 2 時(shí)，所使用的額外內(nèi)存量為“模型”選項(xiàng)卡的顯示列表的大小乘以為之保存顯示列表的每個(gè)布局中的視口數(shù)目。
當(dāng) LAYOUTREGENCTL 設(shè)置為 1 或 2，性能總體變慢時(shí)，或者在顯示列表為之保存的選項(xiàng)卡之間進(jìn)行切換時(shí)，可以考慮設(shè)置為 0 或 1 以尋求工作環(huán)境的最優(yōu)平衡。 有關(guān)性能設(shè)置的其他信息，請(qǐng)參見“系統(tǒng)”選項(xiàng)卡（位于“選項(xiàng)”對(duì)話框中）。
不論 LAYOUTREGENCTL 設(shè)置為何值，如果重新定義塊或放棄選項(xiàng)卡切換，在第一次切換到任意包含保存視口的選項(xiàng)卡時(shí)重生成圖形。

從上面看出不管設(shè)置哪個(gè)值，每次都會(huì)更新，不同的只是是否緩存。