Dim tb As Table = Tables("查询凭证_Table1")
查询过程略
Dim Rowps As Integer = 0
tb.Grid.AllowMerging = C1.Win.C1FlexGrid.AllowMergingEnum.Custom '合并单元格之用
Dim rng As C1.Win.C1FlexGrid.CellRange '合并单元格之用
For i As Integer = 0 To 9
tb.Position = Rowps
Dim Rowcount As Integer = tb.Current("明细行数")
rng = tb.Grid.GetCellRange(Rowps+1, 1, Rowps+Rowcount, 1) '合并单元格
tb.Grid.MergedRanges.add(rng)
Rowps = Rowps + Rowcount
Next
打开其窗体,可以根据不同条件再查询,发现单元格合并总是第一次的设置,以致只有第一次是符合预期,再查询得到的合并不符合要求,求怎么解决
我尝试思路是,每查询前判断一下表行数,若》0,先删除所有行,我以为把已经设置合并的行删除就会一起删除,可还是不行