[求助]如果得到在一张CAD图的面局中循环

fjfhgdwfn

如果得到CAD中有几个布局，并在每一个布局中循环。在线等

xinghesnak

是说判断CAD有几个布局，在每个布局中循环要做什么事情啊？能不能说的明白点。。。

fjfhgdwfn

在每个布局中有两个TEXT，要在TEXT边上画两条张同时把字体改大。如改成8号字

xinghesnak

Dim lay As AcadLayout
Dim i As Integer
For Each lay In ThisDrawing.Layouts
    For i = 0 To lay.Block.Count
        你的处理方式
    Next
Next

就是这样吧，^_^

fjfhgdwfn

谢谢了！在帮忙里找了半天。