Object: Attribute Object
Access: Read/Write
Prerequisites: None
Sets or returns the name of the attribute.
Attribute.Name
None
String. A string that represents the name of the attribute.
For Each attr In CompObj.Attributes
sAttrName = "Attribute name: " & attr.Name
MsgBox sAttrName
Next