VB.NET CAD二次开发 选择集select函数怎么调用

deng_db 2011-03-05 06:04:01
Dim sset As AcadSelectionSet
Dim gpcode(0) As Integer
gpcode(0) = 0
Dim datavalue(0) As Object
datavalue(0) = "circle"
Dim type As Object
Dim value As Object
value = datavalue
type = gpcode
sset = AcadApp.ActiveDocument.SelectionSets.Add("sset")
sset.Select(AcSelect.acSelectionSetAll, , , type, value)
sset.Highlight(True)

想选择实体类型为圆的对象,但运行时提示说select函数的filterType错误,我用的是VS2008的VB请问怎样才能正确调用select函数?
...全文
822 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
deng_db 2011-03-17
  • 打赏
  • 举报
回复 6
我在AutoDesk的官方论坛上找到答案了,把Dim gpcode(0) As Integer改成Dim gpcode(0) As Short就好了

deng_db 2011-03-05
  • 打赏
  • 举报
回复
回复wuyq11
这个全部选择我会啊,能正常使用,当有选择性的选取对象,即select函数最后两个参数设定时就运行错误了,在VB.NET下该怎么正确设置select的参数呢?
wuyq11 2011-03-05
  • 打赏
  • 举报
回复

16,549

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧