MergeRow时,MergeCol不起作用

时间:2013-05-30 07:41:21

标签: vb6 merge msflexgrid

我有一个小的MSFlexGrid,有1个固定列和2个固定行。

enter image description here

正如您所看到的,MergeRow在顶行工作。

我希望第一列中的2个顶部单元格也合并,但分离仍然存在。

我使用的代码是:

with grdPrm
  .MergeCells = 1
  .MergeRow(0) = True
  .MergeCol(0) = True
  .TextMatrix(1, 0) = .TextMatrix(0, 0)
End With 'grdPrm

我尝试了MergeCells的值0,1,2,3,4以及常量flexMergeFree和flexMergeRestrictBoth。

有谁知道为什么MergeCol对我不起作用?

1 个答案:

答案 0 :(得分:1)

.TextMatrix(1, 0) = .TextMatrix(0, 0)似乎没有使内容完全相同。

当我用以下代码替换该行时,MergeCol可以正常工作:

.TextMatrix(0, 0) = "    "
.TextMatrix(1, 0) = "    "

我可能有一些事情要做,我最初通过.FormatString属性填充TextMatrix(0,0):

.FormatString = "^    " & "|> " & strFC(0) & " |> " & strFC(0) & " " & ......

显然.TextMatrix(1, 0) = .TextMatrix(0, 0)只分配内容,而MergeCol也会检查更多内容(如显式格式化)