Foxtable(狐表)用户栏目专家坐堂 → 表格内的内容筛选和计算


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

主题:表格内的内容筛选和计算

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


加好友 发短信
等级:婴狐 帖子:15 积分:194 威望:0 精华:0 注册:2019/11/7 18:09:00
表格内的内容筛选和计算  发帖心情 Post By:2019/11/26 12:59:00 [只看该作者]

图片点击可在新窗口打开查看
请求老师帮忙做一个筛选,工作出勤一列中,如果出差,则在出差列自动写入出差天数。









 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110765 积分:563757 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/11/26 13:44:00 [只看该作者]

datacolchanged事件

If e.DataCol.name = "工作出勤"
    If e.newvalue Like "出差*" Then
        Dim idx As Integer = e.newvalue.LastIndexOf(" ")
        If idx > -1 Then
            e.DataRow("出差") = e.newvalue.substring(idx)
        End If
    End If
End If


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


加好友 发短信
等级:婴狐 帖子:15 积分:194 威望:0 精华:0 注册:2019/11/7 18:09:00
  发帖心情 Post By:2019/11/26 15:34:00 [只看该作者]

If e.DataCol.name = "工作出勤"
    If e.newvalue Like "出差*" Then
        Dim idx As Integer = e.newvalue.LastIndexOf(" ")
        If idx > -1 Then
            e.DataRow("出差") = e.newvalue.substring(idx)
        End If
    End If
End If
老师刚才这个忘记说了,出差列需要计入为数字型的数字,方便后期统计,麻烦老师在帮我改下,谢谢!

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110765 积分:563757 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/11/26 15:43:00 [只看该作者]

e.DataRow("出差") = val(e.newvalue.substring(idx).trim("天"))

 回到顶部