Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
　　With FpSpread1.ActiveSheet
　　　　' 行・列数を設定します
　　　　.ColumnCount = 3
　　　　.RowCount = 7

　　　　' セルを結合します。
　　　　.AddSpanCell(0, 0, 1, 3)
　　　　.AddSpanCell(2, 0, 2, 3)
　　　　.AddSpanCell(4, 0, 2, 3)
　　　　.AddSpanCell(6, 0, 1, 3)

　　　　' セルに値を設定します。
　　　　.Cells(0, 0).Value = "A"
　　　　.Cells(1, 0).Value = "B"
　　　　.Cells(2, 0).Value = "C"
　　　　.Cells(4, 0).Value = "D"
　　　　.Cells(6, 0).Value = "E"

　　　　' すべてのセルに背景色を設定します。
　　　　.Cells(0, 0, .RowCount - 1, .ColumnCount - 1).BackColor = Color.Aqua
　　End With
End Sub

Private Sub FpSpread1_CellClick(sender As Object, e As CellClickEventArgs) Handles FpSpread1.CellClick
　　' セルをクリックした時に表示・非表示を切り替えます。
　　FpSpread1.ActiveSheet.Rows(e.Row).Visible = Not FpSpread1_Sheet1.Rows(e.Row).Visible
End Sub