xinlin 发表于 2004-11-4 17:26:00

如何得到选定的一个块的属性值

比如我有一个块，块有一个“编号”的属性，我想实现：点击这个块，得到这个块的“编号”的值。

王咣生 发表于 2004-11-4 17:32:00

回复

GetAttributes 方法,查一下帮助,有完整的例子,


...


                       Dim varAttributes As Variant<BR>                       varAttributes = blockRefObj.GetAttributes<BR>                       <BR>                       ' Move the attribute tags and values into a string to be displayed in a Msgbox<BR>                       Dim strAttributes As String<BR>                       Dim I As Integer<BR>                       For I = LBound(varAttributes) To UBound(varAttributes)<BR>                                                       strAttributes = strAttributes &amp; "       Tag: " &amp; varAttributes(I).TagString &amp; _<BR>                                                                                                                                                                                       "               Value: " &amp; varAttributes(I).textString &amp; "                       "<BR>                       Next<BR>...
页: [1]
查看完整版本: 如何得到选定的一个块的属性值