_ Public Class Person Private m_name As String = "ݒ" Private m_age As Integer = 0 Public Property Name() As String Get Return m_name End Get Set(ByVal Value As String) m_name = Value End Set End Property Public Property Age() As Integer Get Return Age End Get Set(ByVal Value As Integer) Age = Value End Set End Property End Class