vb.net - 读取自定义程序集属性

Question

我为 DLL 定义了以下程序集属性，但我无法在不同的项目中读取它。你有什么建议吗？

装配属性：

    Namespace Extensions.CustomAttributes

    <AttributeUsage(AttributeTargets.All, Inherited:=True, AllowMultiple:=True)>

    Public Class DeveloperNoteAttribute
        Inherits System.Attribute

        Protected strName, strComment As String
        Protected blnBug As Boolean

        Public Sub New(ByVal Name As String, ByVal Comment As String, ByVal DateRecorded As String)
            MyBase.New()
            strName = Name
            strComment = Comment
        End Sub

        Public Property Name As String
            Get
                Return strName
            End Get
            Set(ByVal value As String)
                strName = value
            End Set
        End Property

        Public Property Comment As String
            Get
                Return strComment
            End Get
            Set(ByVal value As String)
                strComment = value
            End Set
        End Property

        Public Property Bug As Boolean
            Get
                Return blnBug
            End Get
            Set(ByVal value As Boolean)
                blnBug = value
            End Set
        End Property

    End Class

End Namespace

装配信息.vb：

<Assembly: Extensions.CustomAttributes.DeveloperNoteAttribute("Test1", "Test2", "Test3")> 

获取另一个项目中的属性（通过变量：文件名）

Dim oAssem As System.Reflection.Assembly = System.Reflection.Assembly.LoadFrom(Filename)

' Get any assembly-level attributes
Dim oAttribs() As Attribute = Attribute.GetCustomAttributes(oAssem)
For Each att In oAttribs
   Try
        Dim at As Extensions.CustomAttributes.DeveloperNoteAttribute = CType(att, Extensions.CustomAttributes.DeveloperNoteAttribute)
        Debug.WriteLine(at.Name.ToString)
    Catch ex As Exception

    End Try
Next

在调试器中，我得到了很多“System.InvalidCastException”

Answer 1

未来访客问题的解决方案：

1. 您可以像我在上面的问题中所做的那样定义自定义程序集属性。

2. 要读出自定义属性，您可以使用 System.Attribute.GetCustomAttributes() 获取所有定义属性的数组。但是您也可以使用 System.Attribute.GetCustomAttribute() 来获取您传递的类型的特定属性。

信息：

• System.Attribute：http: //msdn.microsoft.com/en-us/library/system.attribute.aspx
• GetCustomAttribute()：http: //msdn.microsoft.com/en-us/library/k7s8054x.aspx

非常感谢@DanVerdolino 的帮助！