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

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

本帖最后由 作者 于 2008-1-3 2:40:56 编辑

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

雪山飞狐_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

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

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

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

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

本帖最后由 作者 于 2008-1-3 2:42:44 编辑 <br /><br /> <p><font color="#ee3d11">&nbsp;不好意思，前面较着急，没讲清楚。</font></p><p><font color="#ee3d11">&nbsp;是指用程序插入的属性块，块看不到。</font><br/>&nbsp;</p><p>&nbsp;&nbsp;&nbsp; 花了几天功夫，问题终于解决了，是插入点定义时不能用</p><p>&nbsp;&nbsp;&nbsp; <font color="#0909f7">Dim tkinsertd(0 To 2)，lscrd1(0 To 2)，lscrd2(0 To 2) As Double</font></p><p><font color="#0909f7">&nbsp;&nbsp;&nbsp; 语句定义，用下列方法定义就可以了，要分开定义</font></p><p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim tkinsertd(0 To 2) As Double<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim lscrd1(0 To 2) As Double<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dim lscrd2(0 To 2) As Double </p><p><font color="#0909f7">&nbsp;&nbsp; &nbsp;</font></p><p><font color="#0909f7">&nbsp; </font></p>
页: [1]
查看完整版本: 急！！！Vb中插入属性块，在图形中看不到