tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板 [ツリー表示へ]   [Home]
一括表示(VB6.0)
タイトルMSFlexGridでセルの結合
記事No14632
投稿日: 2010/04/15(Thu) 18:15
投稿者クン
何時もお世話になっております。

色々とネット等、眺めたのですが理解出来ません。
MSFlexGridにて、行1〜16の列0のセルを結合したいのです。
何卒、宜しくお願い致します。

[ツリー表示へ]
タイトルRe: MSFlexGridでセルの結合
記事No14634
投稿日: 2010/04/15(Thu) 20:45
投稿者花ちゃん
> 何時もお世話になっております。

その割には、注意事項を見ていないのか、無視しているのか? 環境も書いていないし。
(この上のメニューのところのアイコンに続いての文も見えないのかな?)

-128 +127の定義 - クン 10/03/25-12:06 No.14574 他の質問も レスを貰っても返事も
していないし。

ヘルプで、MergeCells プロパティの使用例をご覧になって下さい。
(見たけど解りませんと言われそうなので。)

又、このサイトで検索してもいくらでもでてくるかと。
http://tinyurl.com/y6spsbc

Private Sub Form_Load()
   Dim i As Long
   MSFlexGrid1.Cols = 3
   MSFlexGrid1.Rows = 20
   MSFlexGrid1.MergeCells = flexMergeFree
   MSFlexGrid1.MergeCol(0) = True
   For i = 1 To 16
      MSFlexGrid1.Row = i
      MSFlexGrid1.Col = 0
      MSFlexGrid1.Text = "A"
   Next i
End Sub

[ツリー表示へ]
タイトルRe^2: MSFlexGridでセルの結合
記事No14635
投稿日: 2010/04/16(Fri) 09:40
投稿者クン
> -128 +127の定義 - クン 10/03/25-12:06 No.14574 他の質問も レスを貰っても返事も
> していないし。
上手く動いたので、見落としてしまいました。
誠に申し訳ございません。

> Private Sub Form_Load()
>    Dim i As Long
>    MSFlexGrid1.Cols = 3
>    MSFlexGrid1.Rows = 20
>    MSFlexGrid1.MergeCells = flexMergeFree
>    MSFlexGrid1.MergeCol(0) = True
>    For i = 1 To 16
>       MSFlexGrid1.Row = i
>       MSFlexGrid1.Col = 0
>       MSFlexGrid1.Text = "A"
>    Next i
> End Sub
上手くいきました。ありがとうございました。

[ツリー表示へ]