1 / 23
文档名称:

数据库课程设计(学生成绩管理系统).doc

格式:doc   大小:63KB   页数:23页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

数据库课程设计(学生成绩管理系统).doc

上传人:nb6785 2022/1/23 文件大小:63 KB

下载得到文件列表

数据库课程设计(学生成绩管理系统).doc

文档介绍

文档介绍:.
1 / 23
__
课 程 设 计
题 目
学生成绩管理系统
教 学 院
计算机学院
专 业
计算机科学与技术
班 级
05级二班
姓 名
指导教师
2008

1
查询,留言的删除,留言的查询,留言的查询,密码的修改,教师的查询,教师登陆密码的更改,教师个人信息的修改等基本功能.
<3>学生进行学生成绩管量系统的主要功能是:实现学生自己怕成绩查询,自己登录密码的修改,个人信息的查询,留言的查看,提交留言的基本功能.
图1 主流程图
承担部分:
学生基本信息查询
要求可通过输入学生学号或XX对学生基本信息的查询,可对学生基本信息进行修改和删除。
.
4 / 23
三 详细设计
学生管理模块:学生基本信息查询
图2 学生基本信息查询界面

Private Sub cmdfind_Click<>
Dim sql As String
Dim rs As
Set rs = New
sql = ""
If Trim<> = "" And Trim<> = "" Then
MsgBox "请输入你要查询的内容!", vbOKOnly + vbExclamation, "警告"
Exit Sub
Else
If <> "" And <> "" Then
sql = "select ,Sname,Cname,Grade from Student,Course,Sc where = '" & Trim<> & " ' and Sname like '%" & Trim<> & "%' and = and ="
Set rs = TransactSQL<sql>
ElseIf <> "" And = "" Then
sql = "select ,Sname,Cname,Grade from Student,Course,Sc where = '" & Trim<> & " ' and Sname like '%" & Trim<> & "%' and = and ="
Set rs = TransactSQL<sql>
ElseIf = "" And <> "" Then
sql = "select ,Sname,Cname,Grade from Student,Course,Sc where = '" & Trim<> & " ' and Sname like '%" & Trim<> & "%' and = and ="
Set rs = TransactSQL<sql>
End If
.
4 / 23
End If
If Then
MsgBox "Sorry,无法找到你要想查询的学生的基本信息!"
Else
Sno = rs<"Sno">
Sname = rs<"Sname">
Sc = ""
For i = 1 To
Sc = Sc + rs<"Cname"> & ":" & rs<"Grade"> & vbCrLf

Next
= Sc
sql1 = "select SUM<Grade> as Sum_Grade,AVG<Grade> as Avg_Grade from Sc where ='" & Sno & " '"
Set rs1 = TransactSQL<sql1>
FrmG