Foxtable(狐表)用户栏目专家坐堂 → 这种表数据如何用代码生成


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

主题:这种表数据如何用代码生成

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


加好友 发短信
等级:五尾狐 帖子:1074 积分:9872 威望:0 精华:0 注册:2008/9/2 11:34:00
这种表数据如何用代码生成  发帖心情 Post By:2016/7/12 22:10:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20160712220730.png
图片点击可在新窗口打开查看
请教如何根据成绩用生成这种表?
[此贴子已经被作者于2016/7/12 22:56:39编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1074 积分:9872 威望:0 精华:0 注册:2008/9/2 11:34:00
  发帖心情 Post By:2016/7/12 22:14:00 [只看该作者]

总分为740分,740*0.8之上的为优分,740*0.6之上的为及格,740*0.5之下的为低分

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/7/12 23:18:00 [只看该作者]


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


加好友 发短信
等级:五尾狐 帖子:1074 积分:9872 威望:0 精华:0 注册:2008/9/2 11:34:00
  发帖心情 Post By:2016/7/12 23:28:00 [只看该作者]

这个例子看了,有点不同

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


加好友 发短信
等级:五尾狐 帖子:1074 积分:9872 威望:0 精华:0 注册:2008/9/2 11:34:00
  发帖心情 Post By:2016/7/12 23:32:00 [只看该作者]


Dim dt As DataTable =DataTables("成绩表")
Dim xx As String
For Each r As Row In Tables("总分统计表").Rows
'    xx = r("学校") 
   xx = "白水中学"
   r("人数") = dt.Compute("Count(报名序号)","[学校] = '" & xx & "'")
Next
后面的条件用xx = "白水中学"不出错,但用xx = r("学校")出错
[此贴子已经被作者于2016/7/12 23:34:59编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1074 积分:9872 威望:0 精华:0 注册:2008/9/2 11:34:00
  发帖心情 Post By:2016/7/12 23:38:00 [只看该作者]

怪事,现在又不出错了,之前弄了很久就是出错。

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/7/13 9:12:00 [只看该作者]

 还有什么问题?


 回到顶部