课程设计Word文档下载推荐.docx
《课程设计Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《课程设计Word文档下载推荐.docx（10页珍藏版）》请在冰豆网上搜索。
但是就目前市场上存在的办公系统来看，都是仅仅停留在单一的办公层面。
作为一个当代人，我们很清楚的知道，一味的不停的工作而不加以适当的娱乐休闲不仅会损害员工的身体而且工作效率也极其的低下，最终只能得不偿失。
出于此目的，再结合我们信息工程学院办公室的实际情况，一款名为信息工程学院办公一体化的系统应运而生。
即是对自己本学期学习VB.NET的一种考察，也是对自己编程能力的一种锻炼和提升。
我们学院的办公管理工作上虽然是运用计算机进行，但是并没有形成完整的系统体系，收发文件除了在学校规定的A8系统上外，一般都是用QQ传输的方式进行。
工作起来效率很低，并且不能及时的收发各类所需要的信息，而且我们学院的办公室相对工作量极大，教务上的老师经常劳累一天而不能得到很好的放松。
基于以上的对问题的分析，利用计算机给我们提供信息，及时地调整我院办公室办公系统结构，并且对教师们的之间的办公交流过程形成一整套动态的管理就十分必要了。
系统模块设计
本系统主要分为以下几个模块：
1.办公常用模块，包含了各种办公时会用到的常用功能，有今日安排，邮件发送，备忘录，日历，二级学院通讯录等。
这些都是办公必须用到的功能都集成在了信息工程学院办公一体化系统中，彰显办公的重要与便利。
2.学生管理模块，包含对学生进行管理时必须实现的功能，如查询学生的详细信息，学生的奖惩异动管理，以及最实用的学生考勤管理。
这些的包含定会使本系统的功能强强联合，与其他的单一办公一体化系统具有难以超越的优越性。
3.放松娱乐模块，在烦劳的工作后，使疲倦的工作者有一个放松的平台。
可以听听自己喜欢的音乐，看看短而有趣的视频，再不然，欣赏一下优美的自然风景，让自然风光随着电子相册跳动起来。
当然，说道放松怎么能少了玩个小游戏呢。
那么游戏就必须得包含进这个系统了，一款经典的植物大战僵尸让你从疲惫中全然释放出来。
4.统计报表模块，任何数据都看起来枯燥无味，如果做成图表的形式化，不仅美丽大方，更为重要的是可以是数据表达出的信息淋漓尽致。
5.系统维护模块，里面包含了系统帮助文档，可以帮助用户方便的操作本系统。
还有就是必须的修改密码和退出系统模块了，这些都是一个完整系统所必须的。
系统数据设计
备忘录表的E-R图，如图所示:
二级学院通讯录表的E-R图，如图所示:
奖惩管理表的E-R图，如图所示:
考勤记录表的E-R图，如图所示:
用户表的E-R图，如图所示:
学生详细信息表的E-R图，如图所示:
数据库中实际表结构：
系统功能介绍（包括部分程序代码）
系统实际效果：
图1系统主界面
图2主界面右键快捷菜单
图3办公常用之今日安排
图3办公常用之邮件发送主界面
部分程序代码：
1.用户登入
ImportsSystem.Data.SqlClient
ImportsSystem.IO
PublicClass用户登入
PrivateSubButton1_Click（senderAsObject,eAsEventArgs）HandlesButton1.Click
StaticcountAsInteger
DimfvAsNew用户登入
apppath=Application.StartupPath
IfTestConnection（）Then
DimstrsqlAsString="
selectcount（*）from用户where用户名='
"
&
Trim（TextBox1.Text）&
'
and"
密码='
Trim（TextBox2.Text）&
and身份='
ComboBox1.Text&
objconn1.Open（）
DimobjcmdAsNewSqlCommand（strsql,objconn1）
Dimn1AsInteger=objcmd.ExecuteScalar
objconn1.Close（）
objcmd.Dispose（）
Ifn1>
0Then
xm=Trim（TextBox1.Text）
sf=ComboBox1.Text
DimfrmAsNew主界面
frm.Show（）
Else
count=count+1
SelectCasecount
Case1
Dimts1AsNew提示1
ts1.ShowDialog（）
Case2
Dimts2AsNew提示2
ts2.ShowDialog（）
Case3
Dimts3AsNew提示3
ts3.ShowDialog（）
EndSelect
EndIf
Dimts4AsNew提示4
ts4.ShowDialog（）
EndSub
PrivateSubTextBox1_KeyUp（ByValsenderAsObject,ByValeAsSystem.Windows.Forms.KeyEventArgs）HandlesTextBox1.KeyUp
Ife.KeyCode=Keys.EnterThen
TextBox2.Focus（）
PrivateSubButton2_Click（ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs）HandlesButton2.Click
Me.Close（）
EndClass
2.音乐
PublicClass音乐
Try
Dimapppath1AsString
apppath1=Application.StartupPath+"
\我的音乐"
OpenFileDialog1.InitialDirectory=apppath1
OpenFileDialog1.Filter="
pictures（*.mp3）|*.mp3"
OpenFileDialog1.ShowDialog（）
Me.AxWindowsMediaPlayer1.URL=OpenFileDialog1.FileName
Label5.Text=Me.AxWindowsMediaPlayer1.currentMedia.getItemInfo（"
Title"
）
CatchexAsException
Return
EndTry
PrivateSubButton4_Click（senderAsObject,eAsEventArgs）HandlesButton4.Click
Me.AxWindowsMediaPlayer1.close（）
PrivateSubButton2_Click（senderAsObject,eAsEventArgs）HandlesButton2.Click
Me.AxWindowsMediaPlayer1.Ctlcontrols.play（）
PrivateSubButton3_Click（senderAsObject,eAsEventArgs）HandlesButton3.Click
Me.AxWindowsMediaPlayer1.Ctlcontrols.pause（）
结束语（体会）
办公一体化系统是典型的信息管理系统（MIS）,其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。
对于前者要求建立起数据一致性和完整性强、数据安全性好的库。
而对于后者则要求应用程序功能完备,易使用等特点。
在此基础上，自己在本次系统的开发中大胆创意，在办公系统中融入了休闲娱乐元素，将人性化发挥到极致。
因此，自己深入的学习了除教材外的关于VB.net开发设计的书籍，也看过许多网上的.NET开发的在线视频和搜集了大量的相关学习资料。
没有这些基础自己是很难完成本系统的。
当然，自己遇到不懂的地方也请教老师，在这里要感谢老师的悉心辅导与帮助。
并对SQLServer数据库技术进行了较深入的实际应用，主要完成对办公系统管理系统的需求分析、功能模块划分、数据库模式分析，并由此设计了数据库结构和应用程序。
系统运行结果证明，本文所设计的信息工程学院办公一体化系统达到了课程设计要求并在一定程度上可以用于实际运用。
考虑到开发的信息工程学院办公一体化系统是为了达到“人机结合”有效的减轻教师和教师之间或者领导和领导之间手工操作不便，有效的达到信息的最优化，易查化，更为重要的是，可以让老师们可以有一个放松娱乐的平台，使之高效工作，身体健康。
在正式开始创建该统之前有些前提工作，它包括有对用户的需求进行分析以及构思出理想中想象的或者运行后的界面，为以后的创建理清思路，使创建更方便,快捷。
首先进行的是系统分析即对系统需求的功能，系统运作的流程图和系统E-R图的分析，建立图式模型。
其中E-R图的建立是创建数据的核心工作。
在这次系统设计中，自己在参考老师给出的abc系统的同时，大胆创新，在完善其的基础上更有自己心中想表达的元素融入。
使系统更人性化，美观、漂亮、易操作。
在没做系统前，对VB.NET都只是有个粗略的了解，学习到的知识也比较分散。
在这次做系统的过程中发现自己所了解的相关知识还有很多方面的欠缺，就通过查阅相关书籍和在网上查询相关信息等多个渠道对VB.NET有了个更深入的认识，查询了相关系统设计思路，从中了解到了系统设计的很多注意事项和相关要求等等，在整个系统的设计过程中，自己的知识面得到了很大的提高，也改变了我原来对系统设计的一些错误认识，更重要的是在通过这次系统设计增强了我用VB.NET进行软件开发的浓厚兴趣。
在此系统的开发过程中，由于自己是初次用VB.NET开发类似软件，在知识和经验上存在很多不足。
从这次的实践操作中我们学到了很多书本上没有的东西，在以后的学习之中我们会更加努力、多动手，多动脑做些软件来强化专业知识。
升级会员 