Foxtable(狐表)用户栏目专家坐堂 → 代码求助


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

主题:代码求助

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


加好友 发短信
等级:婴狐 帖子:13 积分:230 威望:0 精华:0 注册:2021/1/20 18:28:00
代码求助  发帖心情 Post By:2021/4/8 13:09:00 [只看该作者]

 Dim str() As String = {"加班成员"}
        For Each c As String In str
 If e.DataRow(c) Like "*巴姆*" Then
                e.DataRow("巴姆")  = dr("加班时长")
            Else
                e.DataRow("巴姆")  = Nothing
            End If
老师我在运行这个代码时我们公司有3个同事分别姓名为白玛巴姆、泽仁巴姆、巴姆,我在录入白玛巴姆和泽仁巴姆数据时,巴姆列也会自动录入加班时长,请问老师这个代码要怎么修改下,可以实现巴姆不会录入泽仁巴姆和白玛巴姆的加班数据。

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


加好友 发短信
等级:三尾狐 帖子:646 积分:4887 威望:0 精华:0 注册:2016/1/16 22:42:00
  发帖心情 Post By:2021/4/8 13:25:00 [只看该作者]

“*巴姆*”是只要包含“巴姆”都执行true部分;
If e.DataRow(c) =  "巴姆"   Then
                e.DataRow("巴姆")  = dr("加班时长")
            Else
                e.DataRow("巴姆")  = Nothing
            End If

 回到顶部