急！！！Vb中插入属性块，在图形中看不到

qazllqaz · 发表于 2007-12-29 03:26:00

在VB中插入属性块，在图形文件中的插入块命令中能看到块，但在图形文件中看不到，我用的是VB6.0+2006

雪山飞狐_lzh · 发表于 2007-12-29 17:31:00

在图形文件中看不到什么？属性？

qazllqaz · 发表于 2008-1-1 16:31:00

看不到块

雪山飞狐_lzh · 发表于 2008-1-1 20:47:00

update一下试试

xxxtttxxx · 发表于 2008-1-1 22:43:00

blockreference

qazllqaz · 发表于 2008-1-2 00:49:00

都试了
用的语句为： Dim bgblk As AcadBlockReference
            tkinsertd(0) = 0: tkinsertd(1) = 0: tkinsertd(2) = 0
            Set bgblk = Acadapp.ActiveDocument.ModelSpace.InsertBlock(tkinsertd, bgtmc，1#, 1#, 1#, 0)
            bgblk.Update
bgtmc为图块名称或dwg文件名称，已定义过，在红色语句以下语句不执行。

mccad · 发表于 2008-1-2 12:32:00

看不懂你提问些什么，再说清楚一些吧。
是指用程序插入的属性块，块可以看到，但属性却看不到？

qazllqaz · 发表于 2008-1-3 02:39:00

  不好意思，前面较着急，没讲清楚。
是指用程序插入的属性块，块看不到。

花了几天功夫，问题终于解决了，是插入点定义时不能用
Dim tkinsertd(0 To 2)，lscrd1(0 To 2)，lscrd2(0 To 2) As Double
语句定义，用下列方法定义就可以了，要分开定义
         Dim tkinsertd(0 To 2) As Double
         Dim lscrd1(0 To 2) As Double
         Dim lscrd2(0 To 2) As Double

急！！！Vb中插入属性块，在图形中看不到

发表回复

精选推荐