Foxtable(狐表) → 用户栏目 → 专家坐堂 → 合计


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

主题：合计
帅哥哟，离线，有人找我吗？
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111471 积分：567443 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/7/19 21:43:00 [显示全部帖子]

请上传实例测试。

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111471 积分：567443 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/7/21 9:22:00 [显示全部帖子]

看datacolchanged事件
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:测试求助项目20200720-合计.zip
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111471 积分：567443 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/7/21 20:23:00 [显示全部帖子]

没看到有什么企业名称、年度。基本上就是加上这2个条件就可以了

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111471 积分：567443 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/7/21 21:08:00 [显示全部帖子]

所有查询统计都加上2个条件就行了

Dim dr As DataRow = e.DataTable.Find("考评要素 = '合计' and 企业名称='" & e.DataRow("企业名称") & "' And 年度='" & e.DataRow("年度") & "'")
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111471 积分：567443 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/7/24 8:56:00 [显示全部帖子]

哪个窗口，怎么操作测试？

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111471 积分：567443 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/7/24 12:18:00 [显示全部帖子]

尽量不要使用currenttable这种用法，而是使用具体的表名

        If dr IsNot Nothing Then
            MessageBox.Show("《安全标准化考评表》中已存在本公司本年度的记录,不能重复添加!","提示",MessageBoxButtons.OK,MessageBoxIcon.warning)
        Else
            For Each r As Row In Tables("快速添加考评打分_Table1").GetCheckedRows
                Dim xz As winform.checkbox = e.Form.controls("checkbox1")
                Dim t As Table = forms("年度考评").controls("table102").Table
                Dim nr As Row = t.addnew
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 6 次数据查询