MSFlexGridで列結合したい

解決

---

VB6.0(SP6)
WindowsXP

MSFlexGridで列を結合させるには、どうすればいいでしょうか。
MergeCellsを使って、行は結合させることができたのですが。

行イメージは以下になります。
---------------------------
|     |     |     |     |
---------------------------
|     |     |     |
|     |     |     |
---------------------------
|                 |
---------------------------

よろしくお願いします。

編集 削除

---

これでいいのでしょうか？

Private Sub Form_Load()
   Dim i As Long, j As Long
   With MSFlexGrid1
      .FixedCols = 0
      .FixedRows = 0
      .Rows = 10
      .Cols = 10
      .MergeCells = flexMergeFree
      .MergeCol(0) = True
      .MergeCol(1) = True
      .MergeCol(2) = True
      .MergeRow(3) = True
   End With
   For i = 1 To 2
      For j = 0 To 2
         MSFlexGrid1.TextMatrix(i, j) = "  "
      Next j
   Next i
   For j = 0 To 2
      MSFlexGrid1.TextMatrix(3, j) = " "
   Next j
End Sub

編集 削除

---

お礼が遅くなって申し訳ありません。無事解決しました。ありがとうございます。

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。