VB.NET自定义属性应用方式解析
VB.NET编程语言的出现，在一定程度上改变了编程人员的编写习惯，它灵活的编写方式提高了编程效率。我们在这里就会为大家带来关于VB.NET自定义属性的应用方式，希望能方便大家的理解。
创新互联建站专注于蚌埠企业网站建设,响应式网站开发,商城网站制作。蚌埠网站建设公司,为蚌埠等地区提供建站服务。全流程按需网站建设，专业设计，全程项目跟踪，创新互联建站专业和态度为您提供的服务
类文件：(Class1)
- Imports System
- Imports System.Reflection
- < AttributeUsage(AttributeTargets.
All, AllowMultiple:=True,
Inherited:=True)> _- Public Class Class1
- Inherits System.Attribute
- Private FamilyName As String
- Private GivenName As String
- Public Sub New(ByVal Family
Name As String)- Me.FamilyName = FamilyName
- End Sub
- Public Overrides Function
ToString() As String- Return String.Format("Author:
{0}{1}", FamilyName, GivenName)- End Function
- Public Property Family() As String
- Get
- Return FamilyName
- End Get
- Set(ByVal Value As String)
- FamilyName = Value
- End Set
- End Property
- Public Property Given() As String
- Get
- Return GivenName
- End Get
- Set(ByVal Value As String)
- GivenName = Value
- End Set
- End Property
- End Class
使用VB.NET自定义属性的文件（Form3.VB）
- < Class1("Watkins", Given:="Damien"),
Class1("Abrams")> _- Public Class Form3
- Inherits System.Windows.Forms.Form
- Private Sub Button1_Click(ByVal sender
As System.Object, ByVal e As System.
EventArgs) Handles Button1.Click- Dim t As TypeType = Type.GetType
("WindowsApplication6.Form3")- Dim attributes As Object() =
t.GetCustomAttributes(True)- Console.WriteLine("Custom
Attributes are: ")- For Each o As Object
In attributes- Console.WriteLine(o)
- Next
- End Sub
- End Class
VB.NET自定义属性的具体应用方式就为大家介绍到这里。
【编辑推荐】
- VB.NET异常迭代捕捉代码示例
- VB.NET共享成员变量创建技巧解析
- 范例解读VB.NET获取环境变量
- VB.NET抓取网页相关问题解决方法
- VB.NET读取内存具体代码编写方法
分享标题：VB.NET自定义属性应用方式解析
URL分享：http://zsjierui.cn/article/cogjosg.html