Dim instance As TextLabel
Dim value As Integer
Dim returnValue As Integer

instance.X = value
returnValue = instance.X

'TextLabelクラス Xプロパティ

Public Class AddIn

    Private std As Std
    Private tl As TextLabel

    Public Sub New()
        std = New Std()
        tl = New TextLabel(std.Owner)
    End Sub

    Public Sub AddIn_Start()
        tl.Text = "Hello World"
        tl.Padding = New System.Windows.Forms.Padding(5, 10, 20, 30)   '左 上 右 下
        tl.X = 500
        tl.Y = 100
        tl.Show()
    End Sub

    Public Sub AddIn_Stop()
        tl.Hide()
    End Sub

End Class

'TextLabelクラス Yプロパティ

Public Class AddIn

    Private std As Std
    Private tl As TextLabel

    Public Sub New()
        std = New Std()
    End Sub

    Public Sub AddIn_Start()
        tl = New TextLabel(std.Owner)
        tl.Text = "Hello World"
        tl.Padding = New System.Windows.Forms.Padding(5, 10, 20, 30)   '左 上 右 下
        tl.X = 500
        tl.Y = 100
        tl.Show()
    End Sub

    Public Sub AddIn_Stop()
        tl.Dispose()
    End Sub

End Class