Foxtable(狐表)用户栏目专家坐堂 → datacolcharged事件,导入数据时,多列变化总是不行


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

主题:datacolcharged事件,导入数据时,多列变化总是不行

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


加好友 发短信
等级:童狐 帖子:292 积分:2735 威望:0 精华:0 注册:2018/5/21 16:49:00
datacolcharged事件,导入数据时,多列变化总是不行  发帖心情 Post By:2023/12/21 17:52:00 [显示全部帖子]


Select Case e.DataCol.Name
    Case "销方名称","货物或应税劳务名称","fa piaopiao种","fa piao归类"
        Dim filter1,filter2,filter3,filter4 As String

            filter1 ="供应商名称= '" & e.DataRow("销方名称") & "'and 开piao内容= '" & e.DataRow("货物或应税劳务名称") & "'and fa piaopiao种= '" & e.DataRow("fa piaopiao种") & "' and 经营单位= '"& _jydw &"'"
filter2 ="供应商名称= '" & e.DataRow("销方名称") & "'and fa piaopiao种= '" & e.DataRow("fa piaopiao种") & "' and 经营单位= '"& _jydw &"'"
  Dim pr1 As DataRow
       
            pr1 = DataTables("凭证规则").sqlFind(filter1)
            If pr1 IsNot Nothing Then
  e.DataRow("名称") = pr1("名称")
            end if
End Select

以上代码写在datacolcharged事件中。
导入EXCEL数据时,filter1为空,pr1也能找到。好奇怪,要怎么改?

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


加好友 发短信
等级:童狐 帖子:292 积分:2735 威望:0 精华:0 注册:2018/5/21 16:49:00
  发帖心情 Post By:2023/12/21 17:55:00 [显示全部帖子]

 象这种多列条件,是不是其中一列为空,那么filter是不是就不成立 ?是不是每一列都要判断一下是否为空?要怎么写?

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


加好友 发短信
等级:童狐 帖子:292 积分:2735 威望:0 精华:0 注册:2018/5/21 16:49:00
  发帖心情 Post By:2023/12/21 21:07:00 [显示全部帖子]

对的。就是你说的意思。先查四个条件都满足的。然后找3个条件满足的。
filter1 ="供应商名称= '" & e.DataRow("销方名称") & "'and 开piao内容= '" & e.DataRow("货物或应税劳务名称") & "'and fa piaopiao种= '" & e.DataRow("fa piaopiao种") & "' and 经营单位= '"& _jydw &"'"
filter2 ="供应商名称= '" & e.DataRow("销方名称") & "'and fa piaopiao种= '" & e.DataRow("fa piaopiao种") & "' and 经营单位= '"& _jydw &"'"
filter3 ="开piao内容= '" & e.DataRow("货物或应税劳务名称") & "'and fa piaopiao种= '" & e.DataRow("fa piaopiao种") & "' and 经营单位= '"& _jydw &"'"
 filter4 ="fa piao归类= '" & e.DataRow("fa piao归类") & "' and 经营单位= '"& _jydw &"'"

 回到顶部