Foxtable(狐表)用户栏目专家坐堂 → 小白初学,请求帮助


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

主题:小白初学,请求帮助

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


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

比如

Dim dt As DataTable = DataTables("学生成绩")
for each dr as datarow in dt.datarows
    dr("男生人数") = dt.Compute("count([性别])", "[性别] = '男' and [班级] = '" & dr("班级") & "'" )
    dr("女生人数") = dt.Compute("count([性别])", "[性别] = '女' and [班级] = '" & dr("班级") & "'" )
next

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


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

Dim dt As DataTable = DataTables("学生成绩")
For Each dr As DataRow In DataTables("班级情况").datarows
    dr("其中_男生人数") = dt.Compute("count([性别])", "[性别] = '男' and [班级] = '" & dr("班级") & "'" )
    dr("其中_女生人数") = dt.Compute("count([性别])", "[性别] = '女' and [班级] = '" & dr("班级") & "'" )
Next

表事件和按钮的用法不一样,不要把按钮的用法直接放到表事件里,也不要把表事件的代码直接用到按钮里

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


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


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


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

dr("建议走访学生家庭名单") = dt.GetComboListString("姓名", "[家庭经济] = '极度贫困' and [学费] = true" ).replace("|",",")

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


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

加上班级做条件即可

 回到顶部