本篇文章给大家分享的是有关VB.NET中如何使用类属性,小编觉得挺实用的,因此分享给大家学习,希望大家阅读完这篇文章后可以有所收获,话不多说,跟着小编一起来看看吧。
VB.NET类属性1、
Public Property Rank() As String
'注意这里的属性名后面有个括号
Get
Return strPos
End Get
Set(ByVal value As String)
strPos = value
End Set
End Property
VB.NET类属性2、
Public ReadOnly Property rHobby() As String 'Readonly要在Property前面 Get Dim i As Integer Dim s As String s = Join(strHobby, ",") '这个函数就是用来连接数组中的字符串的 Return s End Get End Property
VB.NET类属性3、
'这是定义索引器呀! Public ReadOnly Property indexHobby(ByVal index As Integer) As String Get If (strHobby Is Nothing) Or (index > UBound(strHobby)) Then '注意到上面的UBound()了没?还有LBound()! '它们所在的命名空间是Microsoft.VisualBasic Return Nothing End If Return strHobby(index) End Get End Property
VB.NET类属性4、
Public WriteOnly Property wHobby() As String Set(ByVal value As String) If value Is Nothing Then If Not (strHobby Is Nothing) And strHobby.GetLength(0) > 1 Then ReDim Preserve strHobby(UBound(strHobby) - 1) End If Else If strHobby Is Nothing Then ReDim strHobby(0) Else ReDim Preserve strHobby(UBound(strHobby) + 1) End If strHobby(UBound(strHobby)) = value End If End Set End Property
5、
Default Public Property Words(ByVal index As Integer) As String'注意Default Get '注意到参数了吗?使用这个属性的时候,就跟实现了索引器效果一样。<ClassObj(index)> Words = theWords(index) End Get Set(ByVal value As String) theWords(index) = value End Set End Property
以上就是VB.NET中如何使用类属性,小编相信有部分知识点可能是我们日常工作会见到或用到的。希望你能通过这篇文章学到更多知识。更多详情敬请关注亿速云行业资讯频道。
亿速云「云服务器」,即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘,价格低至29元/月。点击查看>>
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。