Foxtable(狐表)用户栏目专家坐堂 → 如果产品等于‘PD01’则含水率等于5%,这句代码怎么写(已解决)


  共有4343人关注过本帖树形打印复制链接

主题:如果产品等于‘PD01’则含水率等于5%,这句代码怎么写(已解决)

帅哥哟,离线,有人找我吗?
a9858
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:251 积分:2392 威望:0 精华:0 注册:2011/11/12 10:39:00
如果产品等于‘PD01’则含水率等于5%,这句代码怎么写(已解决)  发帖心情 Post By:2013/7/22 11:37:00 [只看该作者]

公司进货时有一个产品 'PD01'默认扣除水分5%,
我现在是用净重-(净重*0.05),每次输入5%有点麻烦,有时忘记输入
能不能在增加该产品时自动扣掉5%。
[此贴子已经被作者于2013-7-22 14:08:45编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/7/22 11:49:00 [只看该作者]

可以的呀.可以在DataColChanged事件中判断产品名和净重输入之后 就执行计算即可

 回到顶部
帅哥哟,离线,有人找我吗?
a9858
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:251 积分:2392 威望:0 精华:0 注册:2011/11/12 10:39:00
  发帖心情 Post By:2013/7/22 12:23:00 [只看该作者]

好的我试一下

 回到顶部
帅哥哟,离线,有人找我吗?
a9858
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:251 积分:2392 威望:0 精华:0 注册:2011/11/12 10:39:00
  发帖心情 Post By: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

 回到顶部