'用于计算余数
Dim drs As New List(of DataRow)
With DataTables("出入库")
For Each nm As String In .GetValues("物料编号") '找出每个物料编号的第一行数据, 添加到集合drs中
drs.Add(.Find("物料编号 = '" & nm & "'", "[_SortKey]"))
Next
For Each r As DataRow In drs
.DataCols("出入库数量").RaiseDataColChanged(r) '重置每个产品的第一行
Next
End With
'余数计算结束
以上用于计算余数的代码是放在afteropenproject里面的,但老是出现如下警告:
.NET Framework 版本:4.0.30319.34209
Foxtable 版本:2020.5.29.8
错误所在事件:项目,AfterOpenProject
详细错误信息:
未将对象引用设置到对象的实例。
请问为什么?