请教怎么获取某个属性的所有子项

DCMZ

如上图所示，我想获取“打印样式表”的所有属性：
（专用公路设计）
acad
DWF Virtual Pens
....
请问在那里获取呢，谢谢大家哈

Gu_xl

(vlax-safearray->list
  (vlax-variant-value
    (vla-GetPlotStyleTableNames
      (vla-item        (vla-get-PlotConfigurations
                  (vla-get-ActiveDocument (vlax-get-acad-object))
                )
                0
      )
    )
  )
)

DCMZ

Gu_xl 发表于 2013-3-26 19:57
(vlax-safearray->list
  (vlax-variant-value
    (vla-GetPlotStyleTableNames

先谢过Gu大，今晚加班，明天再来消化Gu大的精髓