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 m_age
        End Get
        Set(ByVal Value As Integer)
            m_age = Value
        End Set
    End Property
End Class