<DefaultProperty("MyProperty")> _
Public Class MeinNeuesControl
 
    Public Property MyProperty() As Integer
        Get
            ' Insert code here.
            Return 0
        End Get
        Set(ByVal value As Integer)
            ' Insert code here.
 
        End Set
    End Property
 
End Class