在DataColChanged事件使用Compute条件问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 在DataColChanged事件使用Compute条件问题

共有4523人关注过本帖树形打印复制链接主题：在DataColChanged事件使用Compute条件问题

xingyou

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：7 积分：124 威望：0 精华：0 注册：2016/6/27 8:47:00

在DataColChanged事件使用Compute条件问题 发帖心情

Post By：2016/7/5 13:22:00 [只看该作者]

在手册中有一个关于”手工编码进行统计"的例子，现在我想实现以下这个功能：

分班级统计出每科的成绩段人数

如图：

此主题相关图片如下：1307_1.png

想通过修改手册中的代码来实现该功能

应该如何设置DataColChanged中的事件啊？

大红袍

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/7/5 14:31:00 [只看该作者]

一样

Dim dr As DataRow = e.DataRow
Dim dt As DataTable =DataTables("学生成绩")
If e.DataCol.Name = "班级" And dr.IsNull("班级") = False Then
dr("语文_优") = dt.Compute("Count(姓名)", "班级 = '" & dr("班级") & "' and 语文 >= 90")
dr("语文_良") = dt.Compute("Count(姓名)", "班级 = '" & dr("班级") & "' and 语文 >= 80 and 语文 < 90")
End If

xingyou

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：7 积分：124 威望：0 精华：0 注册：2016/6/27 8:47:00

Post By：2016/7/5 14:41:00 [只看该作者]

Very Good，太感谢了。我也试了dr(班级)，可就是不行，原来是单引号的位置没有放对。

[此贴子已经被作者于2016/7/5 14:43:26编辑过]

下一主题 >> << 上一主题

主题：在DataColChanged事件使用Compute条件问题