以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 这种表数据如何用代码生成 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=87520) |
-- 作者:bohe -- 发布时间:2016/7/12 22:10:00 -- 这种表数据如何用代码生成 此主题相关图片如下:qq截图20160712220730.png 请教如何根据成绩用生成这种表?
[此贴子已经被作者于2016/7/12 22:56:39编辑过]
|
-- 作者:bohe -- 发布时间:2016/7/12 22:14:00 -- 总分为740分,740*0.8之上的为优分,740*0.6之上的为及格,740*0.5之下的为低分 |
-- 作者:大红袍 -- 发布时间:2016/7/12 23:18:00 -- 参考
http://www.foxtable.com/webhelp/scr/0681.htm |
-- 作者:bohe -- 发布时间:2016/7/12 23:28:00 -- 这个例子看了,有点不同 |
-- 作者:bohe -- 发布时间: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 -- 发布时间:2016/7/12 23:38:00 -- 怪事,现在又不出错了,之前弄了很久就是出错。 |
-- 作者:大红袍 -- 发布时间:2016/7/13 9:12:00 -- 还有什么问题? |