With DataTables("库存")
dd = .Find("[商品名称] = '" & e.DataRow("商品名称") & "'","业务日期 Desc",1) '找出倒数第二次订购PD01产品的记录
If dd Is Nothing Then
MessageBox.Show("当前产品没有库存","提示",MessageBoxButtons.OK)
e.DataRow("数量") = 0
If dd("库存_数量") - e.DataRow("数量") >= 0 Then
dt("出库_数量") = e.DataRow("数量")
Else
MessageBox.Show("输入数量超过库存数量:" & dd("库存_数量") & ",请重新输入","提示",MessageBoxButtons.OK)
e.DataRow("数量") = 0
End If
End If
End With
上面代码当产品未录入库存数据时,会把销售数量设置为0 ,数量列默认值是1
执行时出现
Exception has been thrown by the target of an invocation.
Object reference not set to an instance of an object.
该如何解决?
[此贴子已经被作者于2017/5/12 10:54:37编辑过]