一个课程成绩统计分析系统难煞小女子我了,高手大哥们帮帮忙啊。
我是即将毕业的一个大四女生,今天上咱们的CSDN来求教,可惜币值有点紧张,只能提供一点点,见谅。
在大家都在做相对容易的论文的时候,我顶着压力毅然挑战做毕业设计,从开始到现在一直一个人在狠狠地学,从零开始,经历了开题报告和系统设计报告初稿之后,导师对我的那两项工作相当满意,但眼下的问题是我的程序编的依然一塌糊涂,时间比较紧张。一个小小的学生成绩的统计和分析我却遇到困难重重,找了周围好几圈的人,竟然没有一个人能很清楚明白地赐教。看来我真的只有来向大家求救了,希望高手大哥们能从百忙之中抽出一点宝贵的时间帮帮我。先谢谢您了。
如果您愿意的话,能不能加我的QQ:254460502 到时再请教您具体是的问题好吗?
今天遇到的问题:
1.每个班级成绩中的最高分,最低分,平均分和标准差该如何用VB语言计算出来呢,
2.学生每学期的总评成绩是由期末考试成绩加上平时成绩的,期末占70%,平时占30%。这个总评成绩又该如何表示呢
感谢大家了。。。
[解决办法]
写那么多没用的,也不见课题多难
1.每个班级成绩中的最高分,最低分,平均分和标准差该如何用VB语言计算出来呢,
你开题报告都写了,数据库设计也有了。这就是sql的问题。把数据找出来以后,界面怎么设计才是VB的问题
2.学生每学期的总评成绩是由期末考试成绩加上平时成绩的,期末占70%,平时占30%。这个总评成绩又该如何表示呢
你数据库怎么设计的阿,这个也是数据库问题。找到然后简单公式就好
这些和VB有什么关系呢,数据库阿。你系统设计报告什么样的阿,导师还给好评。真不负责任
[解决办法]
1.每个班级成绩中的最高分,最低分,平均分和标准差该如何用VB语言计算出来呢,
2.学生每学期的总评成绩是由期末考试成绩加上平时成绩的,期末占70%,平时占30%。这个总评成绩又该如何表示呢
1、这种问题都可以直接用Sql语句来实现。Sql2000带有很多数学/聚合函数包括标准差方差之类的。高低分更容易拉。如果是总成绩的话嵌套一下。这只和Sql语句有关系,除了vb任何语言都可以。
select max(总成绩) as 最高分 from(select 英语成绩+计算机+... as 总成绩 from 学生成绩表) as 成绩临时表
select min(总成绩) as 最低分 from(select 英语成绩+计算机+... as 总成绩 from 学生成绩表) as 成绩临时表
select avg(总成绩) as 平均分 from(select 英语成绩+计算机+... as 总成绩 from 学生成绩表) as 成绩临时表
select stdev(总成绩) as 标准差 from(select 英语成绩+计算机+... as 总成绩 from 学生成绩表) as 成绩临时表
2、看样子也是要用Sql语句查询出来。关键看你的学生成绩数据表怎么设计的,然后就是查询。
select 期末比分+平时比分 as 总评成绩 from (
select 期末成绩表.期末成绩*70% as 期末比分,sum(平时成绩表.平时成绩)*30% as 平时比分 from 期末成绩表 INNER JOIN 平时成绩表 ON 平时成绩表.学号 = 期末成绩表.学号) as sst
加和就是总成绩
[解决办法]
我砸你,是因为你其实没干什么。就说顶着压力,获得好评什么的。问周围一圈人什么的
直接问问题,没用的话少说
你要在报告中写上数据库如何设计,用什么工具,access的话。教师,学生,课程,成绩。就这么几张表。教材上他们就是例子,关系什么的也非常明确了。
VB连接access的东西论坛上无数。
你query具体的上面有人回答了。
其他问题的话,你一个个发上来,自然有人给你回答。
顺便说一句,我是姐姐
[解决办法]
1你要添加相应的控件或者dll,你用什么连接数据库阿,adodb的话要去添加
mircosoft activeX data 2.5或者以上,adodc你要添加控件。
然后就是连接字符串,www.connectionstring.com有模板,自己套用一下就好
2.就是显示,这要看你怎么设计你的界面了。mschart有图表功能,你添加相应的控件就好了。
具体控件应用msdn基本讲解清楚。
[解决办法]
我的QQ 9456905 我愿意无条件帮助你,8年前我也和你一样,刚接触VB也是这样.连接数据库写过一次就会了,因为可能是固定的写法.
dim re As New ADODB.Recordset
dim cn As New ADODB.Connection
dim sql as string
cn_str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\HotelManager\database\data.mdb;Persist Security Info=False "
com.ActiveConnection = cn_str
cn.Open cn_str
sql== "select 单位名称 from 表1, 表2 where 表1.年份=表2.年份 and 表1.月份=表2.月份 "
re.Open sql_select, cn, adOpenDynamic, adLockOptimistic
If Not (re.BOF And re.EOF) Then
Text5.Text = re( "单位名称 ")
End If
Set cn = Nothing
Set re = Nothing
这是一部分.其它加我以后在说,验证信息写 请教VB