发布时间 : 星期日 文章(瀹屾暣鐗?璁＄畻鏈轰笓涓氭湰绉戞瘯涓氳鏂?- 鐧惧害鏂囧簱更新完毕开始阅读
图 5-7
打印模块（把学生的数据从学生成绩管理系统打印到excel中）
图 5-8
7全文总结
在本系统的开发过程中，由于本人是初次开发软件，在知识、经验方面都存在着不足。另外，在整个开发的过程中，时间也比较仓促。因此，该系统必然会存在一些缺陷和不足。因为对学生成绩管理的整个流程不够熟悉，在需求分析时未能做到完全满足用户的需求。虽然网络在学生管理系统中的应用很多，因此是未来的发展方向，在本次开发过程由于硬件的限制，实现网络的基本功能，因此在以后的系统更新过程中可能会造成一些不必要的数据损失。
尽管本管理系统存在着很多不足，但其功能全面、易于日后程序更新、
数据库管理容易、界面友好、操作方便、效率高、安全性好等优点是本管理系统所必需的。相信本学生成绩系统是一套学校在日常管理中必不可少的管理软件，通过开发这个系统，我掌握了的项本过程，了解了的基本知识巩固了我对delphi 7.0和SQL2000毕业设计中的最大收获并不是掌握这几门开发工具的应用，而是学会了设计系统的思维方法。
8致 谢
本次毕业设计是在王厚淳老师的悉心指导和热心帮助下完成的。王厚淳老师认真负责的工作制度，严谨的治学精神和深厚的理论水平都使我收益匪浅。他无论在理论上还是在实践中都给我很大的鼓励和指导，使我得到不少的提高，这对于我以后的工作和学习都有很大的帮助。没有王厚淳老师的关心和帮助，我的课题是不可能顺利完成的，特此对王厚淳导师表示真诚的感谢。
9参考文献
[1] 周佩德.《数据库原理及应用》.电子工业出版社 [2]刘明等，delphi程序设计——数据库篇，1999
[3] 李光明.《Delphi6.0编程实例大制作》.冶金工业出版社 [4]，刘明 精通DELPHI6.0入门与提高，人民邮电出版社
[5] 李红等编著，成绩管理系统开发与应用，电子工业出版社，2003 [6]张海藩著，软件工程，清华大学出版社，2005
[7] 康博工作室，张红军，王红等编著《Dephli6.0中文版高级应用与开发
指南》，人民邮电出版社，2005年4月第3版 [8] sql2000编程 清华大学出版社
10 附 录
部分代码：
Private Sub Command1_Click() Dim mrc As ADODB.Recordset
txtsql = %username from use where username='\Trim(Text1.Text) & \Set mrc = ExecuteSQL(txtsql) If mrc.EOF = True Then
MsgBox \用户名错误！\警告\ Text1.SetFocus Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text) Exit Sub End If
username = mrc.Fields(0)
txtsql2 = %username from use where password='\Trim(Text2.Text) & \Set mrc = ExecuteSQL(txtsql2) If mrc.EOF = True Then
MsgBox \密码错误！\警告\ Text2.SetFocus
& &
Text2.SelStart = 0
Text2.SelLength = Len(Text2.Text) Exit Sub End If
txtsql = %username from use where username='\& Trim(Text1.Text) & \Set mrc = ExecuteSQL(txtsql) If mrc.EOF = True Then
MsgBox \用户名称和密码不匹配！\警告\ Exit Sub End If MDIForm1.Show
frmcpass.Text1.Text = Text1.Text Unload Me End Sub
Private Sub Command2_Click() Unload Me End Sub
Private Sub Form_Load() End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Text2.SetFocus End If