以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如果产品等于‘PD01’则含水率等于5%,这句代码怎么写(已解决)  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=38186)

--  作者:a9858
--  发布时间:2013/7/22 11:37:00
--  如果产品等于‘PD01’则含水率等于5%,这句代码怎么写(已解决)
公司进货时有一个产品 \'PD01\'默认扣除水分5%,
我现在是用净重-(净重*0.05),每次输入5%有点麻烦,有时忘记输入
能不能在增加该产品时自动扣掉5%。
[此贴子已经被作者于2013-7-22 14:08:45编辑过]

--  作者:Bin
--  发布时间:2013/7/22 11:49:00
--  
可以的呀.可以在DataColChanged事件中判断产品名和净重输入之后 就执行计算即可
--  作者:a9858
--  发布时间:2013/7/22 12:23:00
--  
好的我试一下
--  作者:a9858
--  发布时间:2013/7/22 14:08:00
--  
已解决代码是这样的希望对后来人有帮助

Dim drs As List(Of DataRow)
drs = DataTables("收料单").Select("[品名] = \'PD01\'")
For Each dr As DataRow In drs
    dr("含水率") = 0.05
Next