- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
简易教务处管理系统报告
VB综合实验报告
系 别: 信息与控制学院
专 业: 应用电子技术
学生姓名: 寇晨光
指导教师: 徐香坤
2011年 4 月 22 日
一.实验题目:
简易的教学管理系统
二.实验目的
1.灵活运用运用各种控件和各种语法规则,程序结构。
2.学会利用数组解决实际问题。熟练运用循环和选择语句对数组操作。
3. 理解过程和函数的概念,掌握子过程的创建和调用以及函数过程的创建和调用
三.实验要求:
独立设计用户界面,设置相应属性,编写相关代码。
四.实验内容:
1.1 设计背景
学校教务管理工作中一项非常重要的工作就是教学调度工作。教学调度工作包括两个方面的内容:一是按教学计划配课、排课,另一方面是日常教务管理。日常教务管理是教学调度工作的一化、规范化处理;
(2) 采用模块式结构,层次清楚,使用直观;
(3) 具有冲突判断能力;
(4) 统计结果准确、直观针对一般教务信息管理系统的需求,通过对教务信息管理工作过程的内容、数据流程和基本信息数据流图的分析,在本系统中主要有以下实体:
学生,包括的数据项有:学生,,,,,,,。
教师课表,方便学校管理。
()教师,包括的数据项有:教师,,,,。
(),包括的数据项有:教师,,,()信息,包括有:,根据模块的设计,以及规范化的设计要求,该设计的数据库表: 学生表教师表表信息
详细设计阶段的关键任务是确定怎样具体地实现所要求的目标系统,也就是要设计出程序的“蓝图”,除了应该保证程序的可靠性外,使将来编写出的程序可读性好,容易理解,容易测试和容易修改,维护是详细设计阶段最重要的目标。
下面的代码能返回各个页面,查找到所需要的信息。
Private Sub chengji_Click()
Form5.Show
End Sub
Private Sub Form_Load()
End Sub
Private Sub gongzi_Click()
Form8.Show
End Sub
Private Sub gongzuojigou_Click()
Form10.Show
End Sub
Private Sub jiaoshidangan_Click()
Form7.Show
End Sub
Private Sub jiaoshikebiao_Click()
Form6.Show
End Sub
Private Sub jieshao_Click()
Form9.Show
End Sub
Private Sub kebiao_Click()
Form3.Show
End Sub
Private Sub tuichu_Click()
Form1.Show
Load Me
End Sub
Private Sub xiaowailianjie_Click()
Form11.Show
End Sub
Private Sub xueshengdangan_Click()
Form4.Show
End Sub
点击每个模块后,会相应的出现一些具体信息,
教师信息里面包括,教师工资,教师课表,教师档案相应代码图片如下Private Sub tuichu_Click()
Form2.Show
Unload Me
End Sub
教师档案代码
Private Sub a_Click()
Data1.DatabaseName = E:\mdb文件
Data1.RecordSource = 教师档案
Data1.Recordset.AddNew
Data1.Recordset(姓名) = Text1.Text
Data1.Recordset(性别) = Text2.Text
Data1.Recordset(住址) = Text3.Text
Data1.Recordset(学历) = Text4.Text
Data1.Recordset(工作时间) = Text5.Text
Data1.Recordset(电话) = Text6.Text
Data1.Recordset.Update
MsgBox 数据添加完毕!!
End Sub
Private Sub b_Click()
Data1.DatabaseName = E:\mdb文件
Data1.RecordSource = 教师档案
Dat
文档评论(0)