镜像的部分如何隐藏

hzm112233

Dim McenPt As Variant '圆心点
Dim McirObj As AcadCircle
   McenPt = GetPoint(KeyBasePt, (Md / 2) * Cos(α * PI / 180), (Md / 2) * Sin(α * PI / 180))
Set McirObj = docObj.ModelSpace.AddCircle(McenPt, kj / 2)
'使用阵列绘制其他的螺钉孔
Dim MArrPolar As Variant '螺钉孔的环形阵列数组
    MArrPolar = McirObj.ArrayPolar(n0, 2 * PI * (n0 - 1) / n0, KeyBasePt)

McirObj.Visible = False    ’隐藏

？？？？？镜像的部分怎么隐藏

hzm112233

阵列的部分  怎么隐藏

MaKaiJin

我用的是镜像删除