怎么样使mshflexgrid空件的象临的四个格合并成一个呢?

解决方案 »

  1.   

    将内容写成一样的。
    再设置MergeRow和MergeCol属性
      

  2.   

    能具体点没有?
    MergeRow和MergeCol属性 不怎么回用?
      

  3.   

    '假定你想使第3列相同的数据项合并:    MSHFlexGrid1.MergeCells = flexMergeFree
        MSHFlexGrid1.AllowBigSelection = False
        MSHFlexGrid1.MergeCol(3) = True
      

  4.   

    给楼主试过如下Option ExplicitPrivate Sub Command1_Click()
        MSHFlexGrid1.MergeCells = flexMergeFree
    '
        
        Me.MSHFlexGrid1.MergeRow(2) = True
        Me.MSHFlexGrid1.MergeRow(1) = True
    '     Me.MSHFlexGrid1.MergeCol(0) = True
    '     MSHFlexGrid1.MergeCol(1) = True    
    End SubPrivate Sub Form_Load()MSHFlexGrid1.Col = 0
    MSHFlexGrid1.Row = 0
    MSHFlexGrid1.Text = "物品编号"
    MSHFlexGrid1.Col = 1
    MSHFlexGrid1.Row = 0
    MSHFlexGrid1.Text = "初期结余"
    MSHFlexGrid1.Col = 2
    MSHFlexGrid1.Row = 0
    MSHFlexGrid1.Text = "初期结余"
    MSHFlexGrid1.Col = 3
    MSHFlexGrid1.Row = 0
    MSHFlexGrid1.Text = "初期结余"
    MSHFlexGrid1.Col = 4
    MSHFlexGrid1.Row = 0
    MSHFlexGrid1.Text = "初期结余"
    MSHFlexGrid1.Col = 0
    MSHFlexGrid1.Row = 1
    MSHFlexGrid1.Text = "物品编号"
    MSHFlexGrid1.Col = 0
    MSHFlexGrid1.Row = 2
    MSHFlexGrid1.Text = "物品编号"
    MSHFlexGrid1.Col = 1
    MSHFlexGrid1.Row = 1
    MSHFlexGrid1.Text = "物品编号"
    MSHFlexGrid1.Col = 1
    MSHFlexGrid1.Row = 2
    MSHFlexGrid1.Text = "物品编号"
    End Sub但是,我想问,这样如果把四个单元格相同的内容全合并起来怎么办,我现在只能是要不然就只管行,要不然就只管列,如果都考虑的话怎么办?还是mshflexgrid不允许四个单元格合并?学习...^_^