在窗体关闭前事件中写入如下代码：

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)
    Next
End With

窗体运行时候报错如下：

.NET Framework 版本：2.0.50727.6419
Foxtable 版本：2014.11.11.1
错误所在事件：窗口,入库管理,Button3,Click
详细错误信息：
未将对象引用设置到对象的实例。