基于vb和sql的学生信息管理系统设计(编辑修改稿)内容摘要:

0 √ profession 专业 Varchar 20 √ tel 电话 Varchar 20 √ 表 学生信息表 字段名 含义 类型 长度 是否可为空 是否作为主键 pno 专业代号 Varchar 10 √ pname 专业名称 Varchar 50 √ 表 专业信息表 字段名 含义 类型 长度 是否可为空 是否作为主键 classname 班级名称 Varchar 10 √ pno 专业代号 Varchar 10 √ snum 学生人数 Int 4 √ 11 数据库表结构设计: ( 1) 用户登录表 : 图 用户登录表 ( 2) 学生成绩表 : 图 学生成绩表 12 ( 3) 课程信息表 : 图 课程信息表 ( 4)班级信息表: 图 班级信息表 13 ( 5) 学生信息表: 图 学生信息表 ( 6) 专业信息表: 图 专业信息表 14 5 系统窗口的设计与实现 登录窗口的设计: 登录认证窗口的设计: 在进入学生 考试 管理系统之前,首先要通过登录认证窗口,只有输入了正确的用户密码和用户权限时才可以进入系统,当输入了错误的或者是不存在的用户名和密码时,系统会给出出错信息提示,要求用户重新输入。 登录窗口如下列图 所示:(当登录用户是学生或者教师时,密码是系统管理员初始设置的密码,以后可以通过本系统自行的更 改自己的密码,当登录用户是管理员时密码是其自己设置的密码。 ) 图 登录认证窗口 15 验证用户登录信息代码: Private Sub Command1_Click() = adCmdText = select * from users where usersname=39。 amp。 Trim() amp。 39。 If = Or = Then If = And = Then MsgBox 用户名和密码不能为空。 End If If = Then MsgBox 请输入密码。 End If If = Then MsgBox 请输入用户名。 End If End If If = Or = Or = Then If = And = And = Then MsgBox 欢迎 + +。 If = 管理员 Then Unload Me End If If = 学生 Then Unload Me End If If = 老师 Then Unload Me End If End If If Or = Then If And = Then 16 MsgBox 密码错误,请重新输入。 End If If Then MsgBox 登录类型错误,请重新选择。 End If End If If = And = Then If = 请选择登录类型 Then MsgBox 请选择登录类型。 End If If And 请选择登录类型 Then MsgBox 登录类型错误,请重新输入。 End If End If End If If RecordCount 0 Then MsgBox 没有此用户名,请重新输入。 End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() End Sub 17 系统主界面的设计: 主窗口是所有用户登陆成功后,所见到的第一个窗口,也是所有用户所有操作的主界面,这里包括了用户被允许进行的操 作,根据功能界面设计如下列图 所示: 图 管理员登陆界面 当不同的登录用户登录时,主界面的操作权限是不同的,当登录用户是管理员时,可以进行所有的操作,但是当登录用户是学生时或者甚至教师时有的操作使用权限就被限制了,当登录用户是学生时如下列图 : 18。
阅读剩余 0%
本站所有文章资讯、展示的图片素材等内容均为注册用户上传(部分报媒/平媒内容转载自网络合作媒体),仅供学习参考。 用户通过本站上传、发布的任何内容的知识产权归属用户或原始著作权人所有。如有侵犯您的版权,请联系我们反馈本站将在三个工作日内改正。