请教：在VBA中如何使对象改变图层

kennethxie

我是刚接触VBA和AutoCAD的新手，诚心请教一个问题：


如果原来在图层layer1有数个对象，但我现在要把他们变成图层layer2的对象，该怎么办呢？请给点详细的代码，在此多谢了！

雪山飞狐_lzh

对象的Layer属性

object.Layer

object

MSITStore:D:\Program%20Files\AutoCAD%202005\help\acadauto.chm::/all_drawing_objects.htm" target="_blank" >All Drawing objects, MSITStore:D:\Program%20Files\AutoCAD%202005\help\acadauto.chm::/idh_attributeref_object.htm" target="_blank" >AttributeReference, MSITStore:D:\Program%20Files\AutoCAD%202005\help\acadauto.chm::/idh_group_object.htm" target="_blank" >Group
The object or objects this property applies to.

Layer

String; read-write (write-only for the Group object)
The name of the layer.