Dim b As New GroupTableBuilder("统计表1",tj_dtb)
b.Groups.AddDef("姓名") '根据产品分组
For Each c2 As Integer In cl2.CheckedIndices
b.Totals.AddDef(cl2.Items(c2))
Next
'总计
b.VerticalTotal = True
b.Build '生成统计表
Tables("统计财_table1").DataSource =DataTables("统计表1")
为什么在Tables("统计财_table1")的BeforeShowContextMenu
无法打开快捷菜单
e.ContextMenu = ContextMenus("tj_tb1_row")