Dim _Dprop As Integer
'''<summary>奇数行、偶数行の選択するプロパティ</summary>
Property Dprop() As Integer
Get
Return _Dprop
End Get
Set(ByVal value As Integer)
_Dprop = value
End Set
End Property
''' <summary> ''' ''' </summary> ''' <value></value> ''' <returns></returns> ''' <remarks></remarks>