乐筑天下

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

VBA如何获取 Hatch对象？

[复制链接]
bbkcylh

5

主题

12

帖子

1

银币

初来乍到

Rank: 1

铜币
32
发表于 2012-9-11 15:56:00 | 显示全部楼层 |阅读模式
想对填充图案设置扩展属性，但是总是搞不明白应该怎么获取Hatch对象。具体就是想通过鼠标点取一个填充对象，然后设置扩展属性，有知道或做过的指点下，谢谢
回复

使用道具 举报

sscylh

6

主题

59

帖子

6

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
83
发表于 2012-9-11 18:19:00 | 显示全部楼层 
  1. 

  2. Sub aa()

  3. Dim en As AcadEntity

  4. ThisDrawing.Utility.GetEntity en, po

  5. If en.ObjectName = "AcDbHatch" Then

  6. .....

  7. End If

  8. End Sub
回复

使用道具 举报

返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-6-30 02:14 , Processed in 0.993514 second(s), 56 queries .

© 2020-2025 乐筑天下

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