沈阳理工大学课程设计专用纸
图3.10:查询类型
代码如下:
Private Sub Command1_Click() Dim str As String
str = \
str = str & \ Adodc1.RecordSource = str Adodc1.Refresh End Sub
Private Sub Command2_Click() MDIForm1.Show 查询.Hide End Sub
Private Sub Form_Load() Combo1.AddItem \课号\Combo1.AddItem \学号\Combo1.AddItem \类型\Combo1.Text = \学号\Text1.Text = \End Sub
15
沈阳理工大学课程设计专用纸
3.8打印报表
在MDIform1窗体中选择打印学生成绩报表就会弹出学生成绩表并打印出来。其中课程表和学生表此处就不敖叙。
学生成绩报表如下:
图3.11:学生成绩报表
16
沈阳理工大学课程设计专用纸
4 总 结
本次课程设计我做的是学生成绩管理系统,该课题要求建立一个管理系统对班级学生成绩进行规范化管理,这次课程设计主要运用到的工具是SQL Server和VB。
经过一周努力,通过请教老师和同学,我终于完成了设计,实现了一些基本的功能,按条件查询学生成绩信息记录,删除不需要的记录等等,不过我也知道我的设计还存在很多不足和需要改进的地方。但是重要的是通过这次课程设计我更好的了解了SQL Server和VB的使用方法,认识到在很多地方这两个工具可以很好的结合在一起使用——首先我们可以用SQL Server建立好一个数据库,然后利用VB规划好操作界面,最后利用ADO控件把两者绑定在一起。这次课设学习很多,收获很大。
17
沈阳理工大学课程设计专用纸
参考文献
[1]王珊.数据库系统简明教程.高等教育出版社.2004 [2]刘文涛. 数据库开发与实例.清华大学出版社.2007
[3]刘炳文.《Visual Basic程序设计教程》.清华大学出版社.2004
[4] 萨师煊、王珊.《数据库系统概论》[M].北京高等教育出版社.2000.2
18
相关推荐: