以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]数据录入 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85791) |
||||
-- 作者:xietan417 -- 发布时间:2016/6/2 17:01:00 -- [求助]数据录入 我想做个表:在表B中设定好充值赠送额度!比如我在表A中输入充值金额大于500小于1000的话,赠送金额为:100元,充值金额大于1000小于1500的话,赠送金额为200元 [此贴子已经被作者于2016/6/2 17:02:12编辑过]
|
||||
-- 作者:xietan417 -- 发布时间:2016/6/2 17:03:00 --
|
||||
-- 作者:大红袍 -- 发布时间:2016/6/2 17:09:00 -- If e.DataCol.Name = "充值金额" Then Dim fdr As DataRow = DataTables("表B").Find("充值金额 <= \'" & e.DataRow("充值金额") & "\'", "充值金额 desc") If fdr Is Nothing Then e.DataRow("赠送金额") = Nothing Else e.DataRow("赠送金额") = fdr("赠送金额") End If End If |