' ****************************************************** ' 初期化 ' ****************************************************** Public Sub Reset() Me.Columns.Clear() End Sub