Dim nms As New List(Of String)'重置累计列
Dim drs As New List(of DataRow)
With DataTables("应收应付")
nms = .GetValues("单位")
For Each nm As String In nms '找出每个单位的第一行数据, 添加到集合drs中
drs.Add(.Find("单位 = '" & nm & "'", "[_SortKey]"))
Next
For Each dr As DataRow In drs
.DataCols("应收增加").RaiseDataColChanged(dr)
.DataCols("应付增加").RaiseDataColChanged(dr)
.DataCols("承兑增加").RaiseDataColChanged(dr)
Next
End With
以上为表事件里的Afterload代码
自己用SQL语句设计了一个加载树窗口，每次打开窗口加载数据后就会弹出错误窗口，提示：
.NET Framework 版本：4.0.30319.42000
Foxtable 版本：2019.8.19.1
错误所在事件：应收应付,AfterLoad
详细错误信息：
未将对象引用设置到对象的实例。
加好友 
发短信
Post By：2019/9/9 16:25:00 [只看该作者]
