how to make a class in the write way

Class Person
        Private _Name As String                                            ' (1)
        Public Property Name() As String
            Get
                Name = _Name                                               ' (2)
            End Get
            Set(ByVal value As String)
                _Name = value                                              ' (3)
            End Set
        End Property
    End Class