乐筑天下

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

vba blockreference的简单问题

[复制链接]
danold1

1

主题

1

帖子

1

银币

初来乍到

Rank: 1

铜币
5
发表于 2018-2-6 08:27:00 | 显示全部楼层 |阅读模式
cad2014
在模型空间中建立了一个属性快，但是在vba中写入以下代码取得块，在本地窗口中查看该对象显示 “无变量” ：
Public Sub test()
Dim cadblockref As AcadBlockReference
Dim pt As Variant
ThisDrawing.Utility.GetEntity cadblockref, pt, ""
Stop
End Sub

r3w5zgqacnt.png

r3w5zgqacnt.png

请问哪位大神帮一下。
回复

使用道具 举报

2017forverd

6

主题

30

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
54
发表于 2018-2-6 09:20:00 | 显示全部楼层
cadblockref 的类型是不是定义错了，换成Acadobject试试那？
回复

使用道具 举报

mikewolf2k

85

主题

1175

帖子

11

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1518
发表于 2018-2-6 09:25:00 | 显示全部楼层
代码没问题，楼主没选中块。
回复

使用道具 举报

返回列表 发帖

发表回复

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

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-13 08:55 , Processed in 0.723597 second(s), 61 queries .

© 2020-2025 乐筑天下

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