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


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

主题：这种表数据如何用代码生成
帅哥哟，离线，有人找我吗？
bohe
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1077 积分：9923 威望：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


加好友 发短信
等级：五尾狐 帖子：1077 积分：9923 威望：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之下的为低分

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


加好友 发短信
等级：五尾狐 帖子：1077 积分：9923 威望：0 精华：0 注册：2008/9/2 11:34:00 		  发帖心情 Post By：2016/7/12 23:28:00 [显示全部帖子]

这个例子看了，有点不同

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


加好友 发短信
等级：五尾狐 帖子：1077 积分：9923 威望：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
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1077 积分：9923 威望：0 精华：0 注册：2008/9/2 11:34:00 		  发帖心情 Post By：2016/7/12 23:38:00 [显示全部帖子]

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

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.14648 秒, 5 次数据查询