Dim dr As DataRow = DataTables("当月采购").Find("供应商 = '" & gys & "' and 单号='" & dh & "' and 物料编码='" & bm & "' and 数量='" & sl & "'")
改成
Dim dr As DataRow = nothing
加好友 
发短信
Post By：2019/3/7 9:04:00 [显示全部帖子]
