请教：面向对象概念-封装

[billow_chentao]

封装是个什么概念？
这是我定义的一个用户类，怎么去封装？
Public Class SystemUser
Private _ID As String
Private _Name As String
Public Sub New()
_ID = ""
_Name = ""
End Sub
Public Sub Dispose()
_ID = Nothing
_Name = Nothing
End Sub
Public Property ID() As String
Get
Return Me._ID
End Get
Set(ByVal value As String)
Me._ID = value
End Set
End Property
Public Property 姓名() As String
Get
Return _Name
End Get
Set(ByVal value As String)
_Name = value
End Set
End Property

Public Overrides Function ToString() As String
Return "ID:" & Me._ID & "姓名:" & Me._Name
End Function
End Class

[快乐乔巴]

你的用户类不是已经是一个封装了麽 直接调用不就可以了