举例介绍VB.NET类属性详细内容

也许还有很多人对于VB.NET这样一款编程语言还不太了解。它是一款功能成强大的语言，直接面向对象，并且可以创造一个结构性比较牢固的编程化境。我们今天要为大家介绍的是VB.NET类属性相关概念。其中有以下几种需要举例的。#t#

创新互联主营运城网站建设的网络公司,主营网站建设方案,重庆APP软件开发,运城h5微信小程序开发搭建,运城网站营销推广欢迎运城等地区企业咨询

VB.NET类属性1、

1. Public Property Rank() As String 
   '注意这里的属性名后面有个括号  
2. Get  
3. Return strPos  
4. End Get  
5. Set(ByVal value As String)  
6. strPos = value 
7. End Set  
8. 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 '注意到参数了吗？使用这个属性的时候，
就跟实现了索引器效果一样。
 
  
  
  
Words = theWords(index)  
  
  
  
End Get  
  
  
  
Set(ByVal value As String)  
  
  
  
theWords(index) = value  
  
  
  
End Set  
  
  
  
End Property 
 
 

分享名称：举例介绍VB.NET类属性详细内容
网站URL：http://www.csdahua.cn/qtweb/news48/257098.html

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

广告

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