此主题相关图片如下:交叉表代码.png

Dim g As New CrossTableBuilder("木工未完分析", DataTables("jd_mgwwmx"))
g.HGroups.AddDef("cjcnq", "承诺期")
g.VGroups.AddDef("gx")
g.Totals.AddDef("pgje", "pgje")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Decimals = 0
g.FromServer=True
g.Build()
Tables("木工负荷分析_Table1").DataSource =g.BuildDataSource
Tables("木工负荷分析_Table1").AutoSizeCols
Tables("木工负荷分析_Table1").Cols.Frozen = 1
以上为交叉表生成代码---生成表后表处于锁定状态
想通过单击来打开另外一个明细窗体查询明细数据 请教如何写代码