把选择的对象放大几倍，VBA怎么实现？

bbu

mccad

object.ScaleEntity BasePoint, ScaleFactor 方法：
其中object为所有图形对象及属性参照对象
BasePoint为基点
ScaleFactor为比例因子
注意对选择集的操作必须遍历选择集中的所有对象，对每个对象进行操作，而不能直接对选择集进行操作，这一点与ALISP不同。