问几个简单的问题！
我现在已经编写好左半边图形程序，怎么把它镜像，使之为图中的效果。最好说具体点！
1.偏置线段为什么出错？
。。。。。
Set LineObj2 = AcadApp.ActiveDocument.ModelSpace.AddLine(Pnt5, Pnt6)
LineObj3=LineObj.offset (-(H+L)/2)<BR>(H,L为变量，运行时提示错误，为什么啊？）
2动态绘图，用轻便多义线生成一矩形框，框名为“aaa”，画剖面线时用
hatchObj.AppendOuterLoop (aaa),提示有错。但是这样谢确可以，为什么呢？为什么要用数组？
Dim LoopObj(0 To 0) As AcadEntity<BR>Set LoopObj(0) = AcadApp.ActiveDocument.ModelSpace.AddLightWeightPolyline(Pnt1)
hatchObj.AppendOuterLoop (LoopObj) 已经把图形镜像了！ 注意的一些内容：<BR>1.偏移的返回值是对象数组，而不是单一的对象，因为有时会返回不只一个对象。<BR>2.添加填充边界也是使用对象数组，而不是对象，因为一个边界可以由多个对象形成。<BR>3. 镜像必须单独对每一对象进行操作，而不能直接对多个对象或整个选择集同时操作。 明白了，谢谢了！
页:
[1]