[求助]：CAD里的按属性选择是怎么用语句实现的??

tpmao · 发表于 2003-12-9 15:22:45

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

我想用VBA实现象QSELECT那样按属性选择CAD里的图形对象!!属性包括按层、颜色，类型、等！！谢谢！！！

christ888 · 发表于 2003-12-9 17:25:45

filter

chj_china · 发表于 2003-12-9 20:16:36

不好意思，我级别太低，我是莱鸟，无法帮你解决这个问题

lsjjm · 发表于 2003-12-10 04:52:57

最初由 tpmao 发布
[B]我想用VBA实现象QSELECT那样按属性选择CAD里的图形对象!!属性包括按层、颜色，类型、等！！谢谢！！！ [/B]

REFER TO:

Sub sets ()
  Dim ss As AcadSelectionSet
  Set ss =Thisdrawing.SelectionSets.Add ("ss0")
  Dim gpCode (0) As Integer
  gpCode(0) = 0
  Dim dataValue (0) As Variant
  dataValue (0)="circle"
  ss.selectacSelectiosetAll,,,gpCode,dataValue
  ss.Highlight (True)
End Sub

tpmao · 发表于 2003-12-10 13:30:41

能不能详细介绍以下 GPCODE 和 DATAVALUE 谢谢!!!!

lsjjm · 发表于 2003-12-12 05:45:41

最初由 tpmao 发布
[B]能不能详细介绍以下 GPCODE 和 DATAVALUE 谢谢!!!! [/B]

都是变量呀
GPCODE 实体对象组码
DATAVALUE 实体对象名称

tpmao · 发表于 2003-12-12 09:13:11

谢谢，楼上的解答！！我已经实验了一下，但是我要过滤那种多边形好象就不行，我用的GPCODE =0 DATAVALUE=" Polyline" 不知道是什么原因！！！！谢谢！！！！！1

lsjjm · 发表于 2003-12-12 11:05:27

多边形: LWPOLYLINE

账号		自动登录	找回密码
密码			立即注册

[求助]：CAD里的按属性选择是怎么用语句实现的??

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子

Re: [求助]：CAD里的按属性选择是怎么用语句实现的??