乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 17|回复: 1

[求助:]请问vb.net怎样全选模型空间的图形 然后判断是否为块

[复制链接]

5

主题

8

帖子

1

银币

初来乍到

Rank: 1

铜币
28
发表于 2011-3-14 10:51:00 | 显示全部楼层 |阅读模式
请问vb.net怎样全选模型空间的图形 然后判断是否为块
回复

使用道具 举报

9

主题

29

帖子

1

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
65
发表于 2011-3-14 11:03:00 | 显示全部楼层

回复
用过滤器
  1. '获取当前活动文档的Editor对象
  2.         Dim ed As Editor = Application.DocumentManager.MdiActiveDocument.Editor
  3.         Dim db As Database = HostApplicationServices.WorkingDatabase
  4. '定义过滤条件
  5.         Dim values() As TypedValue = {New TypedValue(DxfCode.Start, "INSERT")}
  6.         '建立过滤器
  7.         Dim sfilter As New SelectionFilter(values)
  8.         '返回选择集的用户提示类.
  9.         Dim resSel As PromptSelectionResult
  10.         resSel = ed.SelectAll(sfilter)
  11. If resSel.Status  PromptStatus.OK Then
  12.              ' 得到选择集中所有对象的ObjectId集合.
  13.         Dim ids As ObjectId() = resSel.Value.GetObjectIds()
  14.         End If
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-15 13:58 , Processed in 0.381523 second(s), 56 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表