以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  数据加载  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=173788)

--  作者：张飞 --  发布时间：2021/12/16 13:02:00 --  数据加载 在项目时间中  打开项目  工程设计量表 不加载数据，  当打开项目后从其他表切换到 工程设计量表  特别卡，工程设计量表中有一个统计其他表数据的列

--  作者：张飞 --  发布时间：2021/12/16 13:18:00 --   把项目事件DataTables("工程设计量").DataCols("工程名称").RaiseDataColChanged()，放在表事件中，是否可以  Case "工程名称","分项工程","施工部位","施工日期","规格型号"         DataTables("工程设计量").DataCols("工程名称").RaiseDataColChanged(dr)         If dr.IsNull("工程名称") OrElse dr.IsNull("分项工程") OrElse dr.IsNull("施工部位") OrElse dr.IsNull("施工日期")  Then             dr("实耗量") = Nothing         Else             Dim filter As String             filter = "[工程名称] = \'" & dr("工程名称") & "\' And [分项工程] = \'" & dr("分项工程") & "\' And [施工部位] = \'" & dr("施工部位") & "\' And [施工日期] = #" & dr("施工日期") & "# And [强度等级] = \'" & dr("规格型号") & "\' And [出场拌合站] = \'" & dr("出场拌合站") & "\'"             dr("实耗量")  = DataTables("混凝土出场台账").SQLCompute("Sum(运输方量)", Filter)         End If

--  作者：有点蓝 --  发布时间：2021/12/16 13:46:00 --   不需要吧，自己重置自己？理论上会导致死循环的。 [此贴子已经被作者于2021/12/16 13:45:46编辑过]

--  作者：张飞 --  发布时间：2021/12/16 14:43:00 --   不重置怎么保障数据变动时dr("实耗量")是最新的统计数据，不想每次手动重置列    放到项目事件MainTableChanged重置，切换到工程设计量卡的很，需要很长时间才能反应过来 [此贴子已经被作者于2021/12/16 15:08:03编辑过]

--  作者：有点蓝 --  发布时间：2021/12/16 15:09:00 --   不可能每次手动重置列，新录入的数据datacolchanged事件都是自动计算的。