Foxtable(狐表)用户栏目专家坐堂 → [求助]如何将“学生成绩库”中每名学生的平时、期末、总评各科成绩等级分别输出到excel报表中相应单元格?


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

主题:[求助]如何将“学生成绩库”中每名学生的平时、期末、总评各科成绩等级分别输出到excel报表中相应单元格?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/1/4 20:42:00 [显示全部帖子]

 肯定是只能这样过度了。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/1/5 22:27:00 [显示全部帖子]

 呃……说什么错也不说一下。而且你的这段代码无法在1楼的例子里测试。

 照着改不应该出错的啊,你看看你的列名是否写错了

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/1/5 22:28:00 [显示全部帖子]

 生成查询表应该这样写代码才对的。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/1/5 23:03:00 [显示全部帖子]

 没理由内部表可以,外部就不行吧?查询表的fill应该改成true才对的哦。

Dim A As String = Forms("成绩等级打印").Controls("ComboBox0").text
Dim B As String = Forms("成绩等级打印").Controls("ComboBox1").text
Dim D As String = Forms("成绩等级打印").Controls("ComboBox2").text
DataTables("成绩等级表").Fill("Select * from (Select * from (Select * from {学生成绩库} where 考试名称 = '" & A & "') 平时 inner join (Select * from {学生成绩库} where 考试名称 = '" & B & "') 期末 on 平时.身份证号 = 期末.身份证号) c inner join (Select * from {学生成绩库} where 考试名称 = '" & D & "') 总评 on c.平时.身份证号 = 总评.身份证号","网站数据库", true)
MainTable = Tables("成绩等级表")
MessageBox.Show("成绩等级表已生成!")

 回到顶部