社区 › VB › 如何得到选定的一个块的属性值

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

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

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

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

GetAttributes 方法,查一下帮助,有完整的例子,
...
                       Dim varAttributes As Variant
                       varAttributes = blockRefObj.GetAttributes
                       
                       ' Move the attribute tags and values into a string to be displayed in a Msgbox
                       Dim strAttributes As String
                       Dim I As Integer
                       For I = LBound(varAttributes) To UBound(varAttributes)
                                                       strAttributes = strAttributes & "       Tag: " & varAttributes(I).TagString & _
                                                                                                                                                                                       "               Value: " & varAttributes(I).textString & "                       "
                       Next
...

查看完整版本: 如何得到选定的一个块的属性值