Private _SizeLeft As Integer = 0
Private _SizeTop As Integer = 0
Private _SizeRight As Integer = 0
Private _SizeBottom As Integer = 0
' ******************************************************
' サイズ調整用位置プロパティ
' ******************************************************
Public Property SizeLeft() As Integer
Get
Return _SizeLeft
End Get
Set(ByVal value As Integer)
_SizeLeft = value
End Set
End Property
Public Property SizeRight() As Integer
Get
Return _SizeRight
End Get
Set(ByVal value As Integer)
_SizeRight = value
End Set
End Property
Public Property SizeTop() As Integer
Get
Return _SizeTop
End Get
Set(ByVal value As Integer)
_SizeTop = value
End Set
End Property
Public Property SizeBottom() As Integer
Get
Return _SizeBottom
End Get
Set(ByVal value As Integer)
_SizeBottom = value
End Set
End Property
|