基于-VB办公事务管理系统设计

1、- _密 级 _2021届本科毕业生毕业论文题目：基于VB的办公事务管理系统 作者 晓 龙 指导教师 余 鋆 学科专业 计算机科学与技术 系 别 计算机与信息科学学院 学 号200405231基于VB的办公事务管理系统的设计晓龙 梁春燕建昌 计算机与信息科学学院2004级本科一班·庆阳 745000摘 要：在世界经济形势、管理思想和经济技术都在不断开展的形势下，各种先进的管理思想与管理手段竞相争辉，各种信息化管理软件百家争鸣。办公事务管理系统作为一个可视化管理软件，在处理局部或一些小型公司的办公事务管理作业中具有方便、灵活、实用、易操作等特点，能够赢得市场的青睐。办公事务管理系统的设

2、计采用VisualBasic软件作为系统的界面、功能开发工具，数据库局部采用Microsoft公司的Access2000数据库进展开发。该管理系统的完成能够根本实现办公事务管理的规化、自动化。办公事务系统根据公司部的每天都必须管理的各个事务进展了详细的管理，其中包括：文件管理、财产管理、会议管理、值班管理、事故管理、提案管理、车辆管理等。关键词：Visual Basic；数据库；程序；办公事务管理中图：TP311.00 1 可行性研究几乎每个大、中型的公司都有财产、文件、值班、事故、公用财产使用等方面的问题，就其中一个方面举例来说，如车辆管理，如果每个公司都用手工给每个人员记录车辆的使用情况，

3、等人员用完后在记录一次，更复杂的情况是在车辆的使用中发生事故，还要详细记录车辆发生事故的地点对方的及其，车辆的损坏程度等都要做出相应的记录。可手工抄写有时很容易出错。假设将数据输入计算机，需要花费时间，但根据这些数据由计算机计算剩余的资源及对它的结算的速度很快。数据一次输入可以屡次使用。例如通知的时候可以输入一份发送给每个用户。1.1 技术可行性根据我们掌握的知识，合理建立数据库、利用vb开发工具开发数据库管理应用系统来实现办公事务管理在技术上是可行的。如果开发软件给定的时间比拟短，应采用自上而下的模式开发以保证开发的任务完成。在系统第一次正式运行时开发者要全程在场，以便能及时发现问题、解决问

4、题。1.2 经济可行性开发办公事务管理系统，以后每年都可以使用该软件，用计算机进展事务管理省时、省力、不易出错，很有必要性。2 需求分析根据日常办公事务中出现的问题以及用户需求，办公事务管理系统必须完成文件管理、财产管理、会议管理、值班管理、事故管理、提案管理、车辆管理七大功能。其中文件管理包括行文管理、往来信函管理、客户投诉管理、报表发送管理；财产管理包括财产登记、财产维修、财产投保、财产增减四大局部；车辆管理主要包括车辆登记、车辆使用、车辆事故录，这四局部要求可以逐条浏览记录；可以插入、删除或修改*条记录，并能将结果返回到数据库中；可以通过给定条件查询相关记录，并对记录进展输出，输出时不仅

5、通过vb的表格控件进展显示，还应将查询结果输出至e*cel表格。财产管理、会议管理、值班管理以及提案管理要求以表格的形式显示数据库表中所有记录；可以插入、删除或修改*条记录，并能将结果返回到数据库中；可以通过给定条件查询相关记录，并对记录进展输出，要求通过vb的报表控件打印输出。系统管理模块主要用于对系统的用户进展管理，可以添加新用户、删除一个已经存在的用户；可以为用户修改密码，并可以通过此模块退出系统。3 系统设计3.1 系统总体架构行文管理信函管理报表管理客户投诉财产登记财产投保财产维修财产增减车辆登记车辆使用车辆事故办公事务管理系统会议管理文件管理财产管理值班管理事故管理提案管理车辆管理

6、系统管理更改密码查询用户增加用户退出系统图3.1 系统构造功能图3.2 数据库设计基于需求分析阶段所做的操作，可以确定在此系统中涉及的表有行文管理数据表、信函管理、报表管发送管理表、客户投诉管理表、车辆登记表、车辆使用表、财产登记表、车辆事故表、财产投保表、财产维修表、财产增减表、会议管理表、值班管理表、提案管理表、事故管理表、系统管理表。4、功能实现4.1 登陆窗体设计及实现办公事务管理系统面向两类用户，一类是普通职员，也就是普通用户，此类用户可以通过此管理系统来浏览各数据表的容，能够通过一定的条件来查找需要的记录，还可以对自己的密码进展管理；另一类就是系统管理员，这类用户不仅具有普通用户的

7、所有权限，并且可以对数据表进展更新操作，对后台数据库进展管理，并且还可以对所有用户进展管理。因此在设计时用相应的权限来标识用户的身份，并且根据权限的不同来确定用户属于哪类用户，能进展什么样的操作。界面设计及实现代码如下(如图4.1)图4.1代码： Dimt As Integer '记录确定次数Private Sub mand1_Click()Dim sql As StringDim rs_login As New ADODB.RecordsetIf Trim(t*tuser.Te*t) = " Then '判断输入的用户名是否为空 MsgBo* "没有这个用

8、户", vbOKOnly + vbE*clamation, " t*tuser.SetFocusElse sql = "select * from 系统管理 where 用户名='" & t*tuser.Te*t & "'" rs_login.Open sql, conn, adOpenKeyset, adLockPessimistic If rs_login.EOF = True Then MsgBo* "没有这个用户", vbOKOnly + vbE*clamation, &qu

9、ot; t*tuser.SetFocus Else '检验密码是否正确If Trim(rs_login.Fields(1) = Trim(t*tpwd.Te*t) Then userID = t*tuser.Te*t userpow = rs_login.Fields(2) rs_login.Close Unload Me frm*in*i.Show Else MsgBo* "密码不正确", vbOKOnly + vbE*clamation, " t*tpwd.SetFocus End If End IfEnd Ift =t + 1Ift = 3 Then

10、Unload MeEnd IfE*it SubEnd SubPrivate Sub mand2_Click()Unload MeEnd SubPrivate Sub Form_Load()Dim connectionstring As Stringconnectionstring = "provider=Microsoft.Jet.oledb.4.0; data source=db1.mdb"conn.Open connectionstringt = 0End Sub4.2 信息界面设计在登陆成功后，应该进入一个信息显示界面，在显示界面中显示系统的相关设计信息，要求以动态字

11、幕进展显示。主要用到了vb中的时钟控件，通过对该控件相关属性的设置来实现相应的功能。4.3 主界面设计在进入主界面以后，在主界面上以菜单的形式来管理各大模块。其中一级菜单有文件管理、财产管理、会议管理、值班管理、事故管理、提案管理、车辆管理以及系统管理。其中文件管理、车辆管理、财产管理和系统管理包含二级菜单，把它们所包含的功能模块又作成相应的菜单项，点击菜单项后进入的界面用vb中的选项卡实现。在选中一个一级菜单以后可以通过do-case语句可以判断你选中了哪个菜单项，然后判断应对数据库中哪一表进展操作。以文件管理为例，文件管理包含行文管理、信函管理、报表发送管理和客户投诉管理四个菜单项如图4.

12、3： 图当单击其中的任一项都可翻开如图示的界面图：图然后编写代码，来判断应对哪个数据表进展操作。Private Sub cmdsearch1_Click()Select Case SSTab1.Tab Case 0 Unload Me frmsearch1.Show Case 1 Unload Me frmsearch2.Show Case 2 Unload Me frmsearch3.Show Case 3 Unload Me frmsearch4.ShowEnd SelectEnd SubPrivate Sub Form_Load()Dim sql As StringIf userpow

13、= "guest" Then Frame2.Enabled = FalseEnd IfSelect Case select_menu Case "*ingwen" SSTab1.Tab = 0 Case "*inhan" SSTab1.Tab = 1 Case "baobiao" SSTab1.Tab = 2 Case "kehu" SSTab1.Tab = 3End Select'翻开行文管理数据库sql = "select * from 行文管理"rs_*ingw

14、en.CursorLocation = adUseClientrs_*ingwen.Open sql, conn, adOpenKeyset, adLockPessimisticIf rs_*ingwen.EOF = False Then rs_*ingwen.MoveFirst viewdata_*ingwenEnd If其中，会议管理、值班管理、事故管理没有下级菜单，单击这些菜单项，直接翻开页面进展操作。5 测试以行文管理测试设计5.1 对主要数据进展测试测试工程测试步骤发文号发文日期份数年份测试结果1空发文号不能为空2011空请按照yyy-mm-dd输入发文日期30111994-10-2

15、4空份数请输入数字40111994-10-24a空保存年份请输入数字50111994-10-2410空60111994-10-24102增加成功52 对主要功能测试修改功能测试：在数据库中已存储了001-011号文件，可以对它们进展查询，删除和修改等功能。对011号文件进展修改，修改工程有发文日期，保存年份和份数。6 编译并打包发布6.1 编译过程描述： 对于教复杂的程序，出现错误总是不可防止的。VB提供了程序调试工具，通过设置断点、观察变量和过程跟踪等手段，可以帮助程序设计人员来排除程序中出现的错误。程序中的错误可分为编译错误、运行错误和逻辑错误三种类型。6.2 发布过程描述：VB有两中发布过程：接生成可执行文件，在VB的文件菜单中就可以生成。有Package&Deppioyment中就可以生成了。在