teSubgrdScan_Change()
IfgrdScan.ApproxCount>0Then
msSerial=grdScan.Columns(0).CellText(grdScan.Bookmark)
CallSeekTeacher(msSerial)
EndIf
EndSub
PrivateSubgrdScan_RowColChange(LastRowAsVariant,ByValLastColAsInteger)
''如果当前记录正处于编辑状态,则不允许在导航栏中移动记录
IfNotmbCloseThengrdScan.Row=LastRow-1
''如果当前行改变,则动态改变所要显示的记录
IfLastRow<>grdScan.BookmarkThen
IfgrdScan.ApproxCount>0Then
msSerial=grdScan.Columns(0).CellText(grdScan.Bookmark)
CallSeekTeacher(msSerial)
EndIf
EndIf
EndSub
PrivateSubtxtName_Validate(CancelAsBoolean)
txtName.Text=Trim(txtName.Text)
EndSub
PrivateSubtxtSerial_Change()
''当教师编号改变时,就刷新用于显示授课信息的grdTeach控件
IfNotfraInfo.EnabledThen
CallRefreshTeach(msSerial)
EndIf
EndSub
4.教师查询界面:
教师查询界面代码
OptionExplicit
PublicmsFindFieldAsString'查找字段
PublicmsFindOpAsString'查找运算符
PublicmsFindExprAsString'查找表达式
PublicmbFindFailedAsBoolean
PrivateSubcmdCancel_Click()
mbFindFailed=True
Me.Hide
EndSub
PrivateSubtxtExpression_Change()
cmdOK.Enabled=Len(lstFields.Text)>0AndLen(lstOperators.Text)>0AndLen(txtExpression.Text)>0
EndSub
PrivateSublstFields_Click()
cmdOK.Enabled=Len(lstFields.Text)>0AndLen(lstOperators.Text)>0AndLen(txtExpression.Text)>0
EndSub
PrivateSublstOperators_Click()
cmdOK.Enabled=Len(lstFields.Text)>0AndLen(lstOperators.Text)>0AndLen(txtExpression.Text)>0
EndSub
PrivateSubForm_Load()
''查询所需要使用的运算符号
lstOperators.AddItem"="
lstOperators.AddItem"<>"
lstOperators.AddItem">="
lstOperators.AddItem"<="
lstOperators.AddItem">"
lstOperators.AddItem"<"
lstOperators.AddItem"Like"
lstOperators.ListIndex=0
mbFindFailed=True
EndSub
PrivateSubcmdOK_Click()
mbFindFailed=False
''改变指针,告知读者当前处于忙的状态
Screen.MousePointer=vbHourglass
msFindField=lstFields.Text
msFindExpr=txtExpression.Text
msFindOp=lstOperators.Text
Me.Hide
''改变指针,告知读者系统已经不忙
Screen.MousePointer=vbDefault
EndSub
第四章数据库的设计
4.1数据库设计
1.ADMIN表
2.course课程表:
3.coursetype课程类型表:
4.Department系别:
5.teach表:
6.teacher表:
4.2数据库概念和发展
关系数据库是目前各类数据库中最重要、最流行的数据库,他应用数学方法来处理数据库数据,是目前使用最广泛的数据库系统。20世纪70年代以后开发的数据库管理系统产品几乎都是基于关系的。在数据库发展的历史上,最重要的成就就是关系模型。
关系数据库系统与非关系数据库系统的区别是:关系系统只有"表"这一种数据结构;而非关系数据库系统还有其他数据结构,对这些数据结构有其他的操作。
结构化查询语言SQL(StructuredQueryLanguage)是一种介于关系代数与关系演算之间的语言,其功能包括查询、操纵、定义和控制四个方面,是一个通用的、功能极强的关系数据库语言。目前已成为关系数据库的标准语言
4.3系统测试与评价
测试在软件开发过程中一直都是备受关注的,即使在传统的软件工程中,也有一个明确、独立的测试阶段。随着软件危机的频频出现以及人们对于软件本质的进一步认识,测试的地位得到了前所未有的提高。测试已经不仅仅局限于软件开发中的一个阶段,它已经开始贯穿于整个软件开发过程,人们已经开始认识到:测试开始的时间越早,测试执行的越频繁,所带来的整个软件开发成本的下降就会越多。ExtremeProgramming更是把测试推到了极限的位置,一切软件开发活动都要从首先编写测试代码开始。
总结
教师管理系统是一个典型的信息管理系统,其主要通过软件工程方面的选择课题、需求分析、总体设计、选用工具、程序模块、系统测试等几个步骤来实现。开发本系统的过程中,首先要对教师信息管理进行系统调研,熟悉学校教师的人事、档案管理的流程、步骤;其次在系统需求分析过程中,要透过现象看本质,敏锐观察到学校教师管理中存在的各种问题,并在总体设计把握好对问题的分析、理解,进而解决问题;选用开发工具要选用自己最熟悉、应用较多的开发工具,本系统开发选用MSVisualBasic6.0,其具有语言简单、功能强大、组件众多的优点。程序模块的编制中,重点把握系统内部完整性、功能性、实用性、便捷性,使其能够协调统一、运行无误。运行结果证明,本学校教师信息管理系统极大提高了工作效率,节省了人力和物力,最终满足学校管理、学校员工工作的需要,同时也成为现代化学校管理的标志
致谢
我首先感谢我的指导老师吕老师,在他严格的要求下我懂得了开发软件要有一种极其认真负责的态度。无论做什么事都要大胆的去想去做,这样会有好的创意,才能更有作为。
在这里我还要感谢我们宿舍的其它5个同学。他们和我共同生活了四年,在生活和学习上给了我很大的帮助。
参考文献
1陈明.软件工程学教程.科技出版社,2002
2萨师煊,王珊.数据库系统概论.第三版.高等教育出版社,2000
3飞思科技产品研发中心.visualbasic6.0数据库应用开发.电子工业出版社,2003
4飞思科技产品研发中心.visualbasic6.0开发者手册.电子工业出版社,2002
5申旻.visualbasic6.0高手突破.清华大学出版社,2002,302
6SteveTeixeira,XaviverPacheco著,龙劲松,王瑜,谢尚书译.visualbasic6.0开发人员指南.机械工业出版社.2003
7乔林.参透Delphi/Kylix.中国铁道出版社.2003
8李维.Inside深入核心VCL架构剖析.电子工业出版社.2004
9张立科编写组.WindowsAPI函数参考手册.人民邮电出版社.2002
严蔚敏,吴伟民.数据结构.第二版.清华大学出版社.2001
10王珍玲。实用软件工程教程高等教育出版社2004
11(英)IanSommerville机械工业出版社2003
12美Cantu,U.王辉等译visualbasic6.0从入门到精通电子工业出版社2003
13李维面向对象开发实践之路(visualbasic6.0版)(BORLAND资深顾问著名visualbasic6.0专家李维最新力作)电子工业出版社2005.4
14秦斌等visualbasic6.0数据库系统开发与应用中国水利水电出版社2006.1
15刘艺visualbasic6.0面向对象编程思想机械工业出版社2003
16.visualbasic程序设计第二版谭浩强清华大学出版社2003
17.visualbasic6.0程序设计教程.胡同森赵剑锋等.浙江科学技术出版社,2002.1
18.软件工程学教程(第二版)周苏王文著科学出版社2003
19.VisualBasic6.0程序设计与开发技术求是科技人民邮电出版社2004.9
上一篇:
vb教师管理系统vb+access含源代码+可执行程序+论文+开题报告+外文翻译+答辩稿()(论文和程序)
下一篇:
还记得,那年的风车吗?