vsflexgrid 合并单元格？

[studentcom]

我利用vsflexgrid控件绑定ado控件，vsflexgrid的表头为2行，第一列，第一、行的表头内容均为“ID”，且vsflexgrid的MergeCells属性设为：flexMergeFixedOnly。
程序运行后，vsflexgrid能合并该单元格。可是当我更改了ado控件的数据源后，vsflexgrid的内容能正确显示新的数据，可是那些应该合并的表头却分开了，怎么解决这问题？？？

[wingchi]

up一下

[yoki]

vs.MergeCells = flexMergeFixedOnly
vs.MergeRow(0) = True
vs.MergeRow(1) = True

[yoki]

vs.MergeCompare =flexMCNoCase

[射天狼]

Private Sub Form_Load()
Dim i As Long

With sgrd
.Cols = 5
.Rows = 4
For i = 1 To 4
.TextMatrix(0, i) = "学生档案"
.ColAlignment(i) = 4
Next
.TextMatrix(1, 0) = "序号"
.TextMatrix(2, 0) = "2 "
.TextMatrix(3, 0) = "2 "
.TextMatrix(1, 1) = "姓名"
.TextMatrix(1, 2) = "姓名"
.TextMatrix(1, 3) = "性别"
.TextMatrix(1, 4) = "年龄"
.MergeCells = flexMergeRestrictRows
.MergeRow(0) = True
.MergeRow(1) = True
.MergeCol(0) = True
End With
End Sub

[liul17]

vsflexgrid.MergeCells = 1
'行合并
for i = 0 to vsflexgrid.rows-1
vsflexgrid.MergeRow(i) = True
next
'列合并
for i = 0 to vsflexgrid.cols-1
vsflexgrid.MergeCol(i) = True
next
然后在要合并的单元格中，内容设为全部一样，即可看到结果

[flxa]

如以上几种情况,但有时合并的不是很理想!