'生成临时表
Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("请购单号", GetType(String), 16)
dtb.AddDef("产品编码", GetType(String), 16)
dtb.AddDef("品名", GetType(String), 50)
dtb.AddDef("规格", GetType(String), 50)
dtb.AddDef("计量单位", GetType(String), 4)
dtb.AddDef("请购数量", GetType(Double))
dtb.AddDef("采购数量", GetType(Double))
dtb.AddDef("需求日期", GetType(Date))
dtb.AddDef("单价", GetType(Double))
dtb.AddDef("金额", GetType(Double))
dtb.AddDef("交货日期", GetType(Date))
'dtb.Build()
Dim tbl2 As Table = Tables(e.Form.Name & "_采购明细")
tbl2.DataSource = dtb.Build()
'开启临时表事件
DataTables(tbl2.name).GlobalHandler.PrepareEdit = True
DataTables(tbl2.name).GlobalHandler.DataColChanged = True
'DataTables("统计").GlobalHandler.PrepareEdit = True
'DataTables("统计").GlobalHandler.DataColChanged = True
因为这个临时表打开窗口生成后是要绑定到窗口表中的,所以不知道怎么设置,
如果用绑定的表名设置事件开关会出错,用原来的统计表名设置又不起作用,