开始的代码
For i = 0 To 1
    .TextMatrix(0, i) = "人口受灾"
Next
    .MergeCells = flexMergeRestrictAll
For i = 0 To 1
    .MergeRow(i) = True
Next
能成功的将第一行的第一列和第二列合并,但是为什么我把
for i=0 to 1都换成for i=1 to 2却不能把第二烈和第三列合并呢?很让我郁闷,应该不是.mergecells的问题,因为我都试验了请达人指教!!!!!!!!!!

解决方案 »

  1.   

    If Rs_temp.RecordCount > 0 Then
          MSHFlexGrid1.Cols = 2
          MSHFlexGrid1.Rows = 2
          MSHFlexGrid1.FixedCols = 1
          MSHFlexGrid1.FixedRows = 1
          Set MSHFlexGrid1.DataSource = Rs_temp
          '合并单元
          MSHFlexGrid1.MergeCells = 1
          For I = 0 To Val(cFieldnum.Tag & "")
            MSHFlexGrid1.MergeCol(I) = True
          Next
          '固定列
          MSHFlexGrid1.FixedCols = Val(cFieldnum.Tag & "")
          MSHFlexGrid1.colwidth(0) = 150   '空
          MSHFlexGrid1.colwidth(1) = 4050   '空
          MSHFlexGrid1.colwidth(2) = 1650   '空
          MSHFlexGrid1.colwidth(3) = 1650   '空
          MSHFlexGrid1.colwidth(4) = 1650   '空
      

  2.   

    HFGTitle.MergeCells = flexMergeFree