以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  根据表列内容判断替代值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133628)
--  作者：zhuxinhui
--  发布时间：2019/4/17 12:38:00
--  根据表列内容判断替代值

想在补贴列录入数值后，根据部门列内空判断，只要是“部门”相同补贴值就相同，现在一录入去就成列值相同的，怎样加多条件判断


图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.zip
--  作者：有点色
--  发布时间：2019/4/17 12:59:00
--  
Select Case e.DataCol.name
    Case "补贴"
        systemready = False
        e.DataTable.ReplaceFor("补贴", e.newvalue, "部门 = \'" & e.DataRow("部门") & "\'")
        systemready = True
  End Select
--  作者：zhuxinhui
--  发布时间：2019/4/17 14:26:00
--  

图片点击可在新窗口打开查看此主题相关图片如下：5.png
图片点击可在新窗口打开查看
--  作者：zhuxinhui
--  发布时间：2019/4/17 14:27:00
--  
改动后出现这种错误
--  作者：有点甜
--  发布时间：2019/4/17 15:47:00
--  
Select Case e.DataCol.name
    Case "补贴"
        systemready = False
        e.DataTable.ReplaceFor("补贴", iif(e.newvalue=Nothing, dbnull.value, e.newvalue), "部门 = \'" & e.DataRow("部门") & "\'")
        systemready = True
End Select