选择集不想选尺寸搞不定

petty

Dim ft(3) As Integer, fd(3) As Variant
ft(0) = 8
fd(0) = "0"
'  ft(1) = -4
' fd(1) = "NOT"
'   ft(2) = 0
' fd(2) = "DIMENSION"
'  ft(3) = -4
' fd(3) = "NOT"
单一条件的会了，不想选尺寸以上代码什么也选 不到

petty

Dim ft(0 To 8) As Integer
Dim fd(0 To 8) As Variant
'Dim ft, fd
  ft(0) = -4
fd(0) = "AND<"
            ft(1) = -4
            fd(1) = "<OR"
                    ft(2) = 0
                   fd(2) = "LINE"
                   ft(3) = 0
                   fd(3) = "SPLINE"
              ft(4) = -4
             fd(4) = "OR>"
      ft(5) = -4
      fd(5) = "NOT<"
      ft(6) = 8
      fd(6) = "中心线"
      ft(7) = -4
     fd(7) = "NOT>"
  ft(8) = -4
fd(8) = "AND>"
我想选不在中心线图层上的线和spline，怎么也选不到，高手看看错哪了

petty

刚发完，自己搞定了这个问题，另外请教下，不在视野中的物体选择集选 不到，有什么办法吗

sxpd

ft(0) = 0
fd(0) = "line,spline"
ft(1) = 8
fd(1) = "~中心线"

窗口模式的选择是没办法选不在视野
用selectall

petty

你太牛了，几条就解决问题了，我用了and,or,not等多条循环组合。谢谢。
窗口corss模式我找到解决办法了，就是程序对不在范围内内的东西选择前先secommand,zoom,a方法，然后选择完secommadn,zoom,p返回前一窗口