?水不准是啥玩意?
数据的东西哪个不准自己跟踪一下是不是每次查询的结果都一样
Dim dr1 As DataRow = drs(0)
msgbox(dr1("已进货数量"))
msgbox(dr1("已退货数量"))
msgbox(dr1("已销售数量"))
dr1("柜台余货数量") = dr1("已进货数量") - dr1("已退货数量") - dr1("已销售数量")
dr1("柜台余货金重") = dr1("已进货金重") - dr1("已退货金重") - dr1("已销售金重")
dr1("柜台余货标价") = dr1("已进货标价") - dr1("已退货标价") - dr1("已销售标价")