Dim instance As TextLabel Dim value As System.Drawing.Color Dim returnValue As System.Drawing.Color instance.BackColor = value returnValue = instance.BackColor
'TextLabelクラス BackColorプロパティ 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.BackColor = System.Drawing.Color.Red tl.Show() End Sub Public Sub AddIn_Stop() tl.Hide() End Sub End Class
'TextLabelクラス BackColorプロパティ 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.BackColor = System.Drawing.Color.Red tl.Show() End Sub Public Sub AddIn_Stop() tl.Dispose() End Sub End Class
このページのQRコード
便利ウェブサイト
便利 Android アプリ
便利 iOS(iPhone,iPad) アプリ