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，先删除所有行，我以为把已经设置合并的行删除就会一起删除，可还是不行
加好友 
发短信
Post By：2018/11/13 9:42:00 [只看该作者]
