VB.NET中标准的实体类怎么写的,请教VB高手指导

'代码来源：代码街codejie.net

站在用户的角度思考问题，与客户深入沟通，找到武邑网站设计与武邑网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：网站设计制作、成都网站建设、企业官网、英文网站、手机端网站、网站推广、国际域名空间、雅安服务器托管、企业邮箱。业务覆盖武邑地区。

'由于在vb.net里变量名不区分大小写（StuName和stuname是一样的），所以个别变量名需要修改

'在vb.net中,模块级变量的命名原则是以m_开头

Public Class Student

Private m_stuNo As String '学生号字段

Private m_stuName As String '学生姓名字段

Private m_stuAge As Integer '学生年龄字段

Private m_stuAddress As String '学生住址字段

'无参构造方法

Public Sub New()

End Sub

'有参构造方法

Public Sub New(ByVal stuNo As String, ByVal stuName As String, ByVal stuAge As Integer, ByVal stuAddress As String)

m_stuNo = stuNo

m_stuName = stuName

m_stuAge = stuAge

m_stuAddress = stuAddress

End Sub

'学生号属性

Public Property StuNo() As String

Get

Return m_stuNo

End Get

Set(ByVal value As String)

m_stuNo = value

End Set

End Property

'学生姓名属性

Public Property StuName() As String

Get

Return m_stuName

End Get

Set(ByVal value As String)

m_stuName = value

End Set

End Property

'学生年龄属性

Public Property StuAge() As Integer

Get

Return m_stuAge

End Get

Set(ByVal value As Integer)

m_stuAge = value

End Set

End Property

'学生住址属性

Public Property StuAddress() As String

Get

Return m_stuAddress

End Get

Set(ByVal value As String)

m_stuAddress = value

End Set

End Property

End Class

VB.NET怎么写没有构造函数的类?

不可能的。任何类即便你不加构造函数，默认会加的。不过你可以尝试两种方法：1）在Sub New之前加一个Private，这样你就不能用构造函数声明了，与编译错误。2）只声明这一个带参构造函数，不声明不带参数的，但是调用却用无参的方式，也会发生编译错误。

vb.net 写一个类?

Public Class Name1

Public Function fun1()

...

End Function

....

End Class

当前标题：vb.net类怎么写 vbnet imports
本文链接：http://myzitong.com/article/dddpedp.html