Foxtable(狐表)用户栏目专家坐堂 → [求助]代码运行效果不好


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

主题:[求助]代码运行效果不好

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


加好友 发短信
等级:婴狐 帖子:3 积分:91 威望:0 精华:0 注册:2020/1/13 14:57:00
[求助]代码运行效果不好  发帖心情 Post By:2020/1/14 9:50:00 [显示全部帖子]

If e.DataCol.Name = "姓名" Then
    If e.DataRow("姓名") = Nothing Then
        e.DataRow.DELETE
    Else
        Dim dr As DataRow
        dr = DataTables("运维人员").Find("[员工姓名] = '" & e.NewValue & "'")
        If dr IsNot Nothing Then
            e.DataRow.delete
        End If
    End If
End If
老师我在考勤汇总里面datacolchanged运行这段代码,使用高速合并功能后表头就不在了,真的很苦恼,麻烦老师帮忙梳理梳理!

 回到顶部