错误信息：
.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2015.12.22.1
错误所在事件：表，账单明细，DataColChanged
详细错误信息：
调用的目标发生了异常。
未将对象引用设置到对象的实例。
被引用表：
Select Case e.DataCol.Name
Case "客户简称","到港日期","报关单号码","船名航次","提单号码","运输方式","箱量","贸易方式","件数","起运港","抵达港","重量","品名","月份"
Dim Filter As String = "[fa piao号码] = '" & e.DataRow("fa piao号码") & "'"
Dim drs As List(Of DataRow) = DataTables("账单明细").Select(Filter)
For Each dr As DataRow In drs
dr(e.DataCol.Name) = e.NewValue
Next
End Select
引用表：
If e.DataCol.Name = "fa piao号码" Then
If e.NewValue Is Nothing Then
e.DataRow("客户简称") = Nothing
e.DataRow("到港日期") = Nothing
e.DataRow("报关单号码") = Nothing
e.DataRow("船名航次") = Nothing
e.DataRow("提单号码") = Nothing
e.DataRow("运输方式") = Nothing
e.DataRow("箱量") = Nothing
e.DataRow("贸易方式") = Nothing
e.DataRow("件数") = Nothing
e.DataRow("起运港") = Nothing
e.DataRow("抵达港") = Nothing
e.DataRow("重量") = Nothing
e.DataRow("品名") = Nothing
e.DataRow("月份") = Nothing
Else
Dim dr As DataRow
dr = DataTables("进口业务进度表").Find("[fa piao号码] = '" & e.NewValue & "'")
If dr IsNot Nothing
e.DataRow("客户简称") = dr("客户简称")
e.DataRow("到港日期") = dr("到港日期")
e.DataRow("报关单号码") = dr("报关单号码")
e.DataRow("船名航次") = dr("船名航次")
e.DataRow("提单号码") = dr("提单号码")
e.DataRow("运输方式") = dr("运输方式")
e.DataRow("箱量") = dr("箱量")
e.DataRow("贸易方式") = dr("贸易方式")
e.DataRow("件数") = dr("件数")
e.DataRow("起运港") = dr("起运港")
e.DataRow("抵达港") = dr("抵达港")
e.DataRow("重量") = dr("重量")
e.DataRow("品名") = dr("品名")
e.DataRow("月份") = dr("月份")
End If
End If
End If
加好友 
发短信
Post By：2016/1/7 11:14:00 [只看该作者]
