Dim instance As TextLabel Dim value As System.Windows.Forms.Padding Dim returnValue As System.Windows.Forms.Padding instance.Padding = value returnValue = instance.Padding
'TextLabelクラス Paddingプロパティ
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.Show()
End Sub
Public Sub AddIn_Stop()
tl.Close()
End Sub
End Class
このページのQRコード
便利ウェブサイト
便利 Steam アプリ
便利 Android アプリ