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自定义属性应用方式解析
网站链接：http://www.36103.cn/qtweb/news42/20042.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源：创新互联

猜你还喜欢下面的内容