当前位置:论文写作 > 论文大全 > 文章内容

基于ExcelVBA的示范建设项目管理系统开发实现

主题:项目信息网 下载地址:论文doc下载 原创作者:原创作者未知 评分:9.0分 更新时间: 2024-03-13

简介:适合项目信息论文写作的大学硕士及相关本科毕业论文,相关项目信息开题报告范文和学术职称论文参考文献下载。

项目信息论文范文

项目信息网论文

目录

  1. 1.选题背景及意义
  2. 2.Excel VBA简介
  3. 3.系统设计及实现
  4. 3.1功能设计
  5. 3.1.1登录界面
  6. 1.0:
  7. 3.1.2主界面
  8. 3.1.3添加项目信息窗体
  9. 3.1.4修改项目信息窗体
  10. 3.1.5查询项目信息窗体
  11. 3.1.6删除项目信息窗体
  12. 3.1.7统计建设进度信息
  13. 3.2数据库表设计
  14. 3.2.1登录工作表
  15. 3.2.2设置工作表
  16. 3.2.3“项目信息”工作表
  17. 3.2.4“建设进度统计”数据表
  18. 4.结论
  19. 项目信息网:20-1-2 项目信息设置

(泸州职业技术学院信息工程系,四川泸州646005)

[摘 要]应用基于 VBA(Visual Basic for Application)的 Excel 二次开发,可以扩展Excel的功能及其自动化水平,本文介绍了设计示范建设项目管理系统的方法和实例及相应程序,操作简单,使用方便,可以大大简化常规工作统计工作,具有一定的应用价值.

[关键词]Excel VBA;项目管理

[DOI]10.13939/j.cnki.zgsc.2015.41.127

1.选题背景及意义

随着计算机的普遍应用,以Office办公软件为开发平台,以实现办公自动化以及管理信息化为目的,设计开发的小型信息管理系统成为提高工作效率重要的、有效的手段.尤其成为各大院校进行教学改革的重要内容.

高职院校示范建设工作是一项综合复杂的系统工程,任务量大,涉及的内容很多,具有典型“项目” 的特征.因此,示范建设信息化管理尤为重要,一个功能实用、操作方便,简单明了的项目信息管理系统可以满足高校重点专业建设项目管理的需要,为各重点建设项目方便快捷地进行信息管理提供一个平台,为示范建设工作带来方便,提高工作效率.Excel VBA是微软公司开发历史最为悠久的数据库开发工具,由于具有使用方便、成本低、开发速度快等优点.本课题开发了这样一个简单、易操作的“基于Excel VBA的示范建设项目管理系统”.基于微软Office 2010平台 ,使用VBA技术进行二次开发,将Excel作为数据录入的前台,利用VBA 调用Excel内置对象实现系统功能.

2.Excel VBA简介

Visual Basic for Application(简称VBA)作为论文范文的标准宏语言,是由Visual Basic for Windows逐渐发展起来的,是一种可以支持面向对象的程序设计语言.由于它具有可以直接应用于Office套装软件的各项强大功能,且其宏记录器可以很容易的实现日常工作与VBA语言之间的相互转换,可以轻松实现办公自动化,因此近年来广受人们的青睐.

在日常管理中,经常会遇到对一些数据表格进行处理的事务,利用VBA将这类数据构建成小型信息管理系统,可以更方便、快捷地调用和处理这些表格式数据.

3.系统设计及实现

3.1功能设计

本系统的功能是通过多个用户窗体及用户主界面来实现,有用户登录界面、系统主界面、添加项目信息窗体、修改项目信息窗体、查询项目信息窗体、删除项目信息窗体和统计建设进度信息窗体.

系统功能结构如图1所示.

3.1.1登录界面

用户登录界面可以实现用户的登录,点击登录按钮,系统根据用户输入的用户名及论文范文自动查询“设置”数据表中的数据,若输入的用户名在数据库中存在则判断论文范文是否正确,若输入错误会显示错误提示,若输入正确即可进入系统主界面.如图2所示.

实现的关键代码如下:

Private Sub CommandButton1_Click()

On Error GoTo 10&,acute,当姓名与论文范文不对应时,会出现错误,转到10语句处理

Dim n As String

Set sh等于Sheets("设置")

na等于TextBox1.Text: ps等于TextBox2.Text&,acute, 取得登录窗口中的姓名与论文范文

If na等于"" Or ps等于"" Then MsgBox "未输入用户名或论文范文,不能登录",,"提示": Exit Sub

s等于WorksheetFunction.Match(na,sh.[a∶a],0)&,acute,查找用户在A列的位置

n等于sh.Cells(s,2)&,acute,取出“设置”表中的权限论文范文

If n <,>, ps Then GoTo 10

1.0:

MsgBox "姓名或论文范文错误,不能登录",,"提示"

End Sub

3.1.2主界面

主界面可以实现整个系统功能的导航的作用.进入主界面可以看到“添加项目信息”、“修改项目信息”、“查询项目信息”、“删除项目信息”、“统计建设进度信息”和“退出系统”六个按钮,点击按钮即可进入相应界面.如图3所示.

项目信息网:20-1-2 项目信息设置

实现关键代码如下:

Rem 添加项目信息

Private Sub CommandButton1_Click()

Me.Hide

tianjiaxm.Show

End Sub

Rem 修改项目信息

Private Sub CommandButton2_Click()

Me.Hide

xiugaixm.Show

End Sub

Rem 查询项目信息

Private Sub CommandButton3_Click()

Me.Hide

chaxunxm.Show

End Sub

Rem 删除项目信息

Private Sub CommandButton4_Click()

Me.Hide

shanchuxm.Show

End Sub

Rem 统计已完成数

Private Sub CommandButton5_Click()

Dim wk As Workbook

Dim wt As Worksheet

Dim wtxb As Worksheet

Dim currow As Integer

Dim malecnt As Integer

Dim femalecnt As Integer

Set wk等于Workbooks("项目信息管理.xl论文范文")

With wk

Set wt等于.Worksheets("项目信息表")

Set wtjd等于.Worksheets("建设进度统计表")

End With

currow等于3

malecnt等于0&,acute,求和前清0

femalecnt等于0

Do While Not IsEmpty(wt.Cells(currow,1).Value)

If wt.Cells(currow,9).Value等于"已完成" Then

malecnt等于malecnt+1&,acute,已完成总数加1

Else

femalecnt等于femalecnt+1&,acute,未完成总数加1

End If

currow等于currow+1

Loop

wtjd.Activate

wtjd.Range("B3").Value等于CStr(malecnt)

wtjd.Range("B4").Value等于CStr(femalecnt)

MsgBox "成功完成建设进度统计!",vbOKOnly,"统计已完成数"

Application.Visible等于True

Set wk等于Nothing

Set wt等于Nothing

Set wtjd等于Nothing

End Sub

3.1.3添加项目信息窗体

在此窗体中可以添加新的项目名称以及该项目的主要信息,确认添加后在工作表里可以直接看到相关记录.

3.1.4修改项目信息窗体

在此窗体中输入项目名称可以查找到该项目的主要信息,然后根据需要进行修改,修改后的数据在工作表里会直接呈现出来.

3.1.5查询项目信息窗体

在此窗体中输入项目名称可以在项目信息工作表中立即查找到该项目的所有记录,并以选中状态显示,方便用户迅速找到想查看的项目.

3.1.6删除项目信息窗体

在此窗体中输入项目名称,点击“删除”按钮将弹出确认是否要删除该项目的对话框,若要删除再点击“是”按钮即可删除某项目的所有记录.

3.1.7统计建设进度信息

在此窗体中可以统计出所有已完成和未完成的建设项目数量.统计出的数据会显示在工作表“建设进度统计表”中.

3.2数据库表设计

本系统直接采用excel中的工作表作为数据库,根据需要共设计了四个工作表,分别为:“登录”、“设置”、“项目信息表”和“建设进度统计表”.

3.2.1登录工作表

登录工作表主要用于显示登录界面,当用户未登录时,只看得到登录工作表,其他工作表处于隐藏状态,是看不到的.

3.2.2设置工作表

设置工作表主要用于存放用户名和其相对应的论文范文数据,可以存入多个用户名及多个论文范文.后面的“1”代表该用户的权限,即可以查看和修改哪些工作表的内容.如图4所示.

3.2.3“项目信息”工作表

该数据表中存储着所有重点建设项目的主要信息,包括项目名称、项目编号、项目负责人、项目组成员、建设经费、建设内容、建设周期及建设进度等,其格式如图5所示.

3.2.4“建设进度统计”数据表

该数据表将通过点击主界面的“统计建设进度信息”按钮而自动统计出所有建设项目已完成的数量和未完成的数量,数据会随着项目信息表中的变化而变化.其格式如图6所示.

4.结论

通过本软件开发,完成了一个基于Excel VBA的示范建设项目管理系统,在Excel中调试通过.系统以Excel的形式,利用VBA的二次开发为高等院校示范建设工作提供了更科学化、规范化、信息化的管理平台和交互手段,促进项目信息化管理工作更有效地开展.此外,用户还可以根据自己的不同需求对系统进行相应修改,以实现更多功能.

参考文献:

[1]李政.VBA应用基础及实例教程[M].北京:国防工业出版社,2005.

[2]刘增杰.Excel 2010 VBA 入门与实战 [M].北京:清华大学出版社,2012.9.

[3]陈莉.Excel 及其应用[M].重庆:重庆大学出版社,2000.

[4]魏汪洋.从零开始学Excel VBA[M].北京:电子工业出版社,2011.

总结:本论文可用于项目信息论文范文参考下载,项目信息相关论文写作参考研究。

项目信息网引用文献:

[1] 电子信息和项目管理本科论文范文 电子信息和项目管理类论文范本2万字
[2] 电子信息行业和项目管理毕业论文的格式范文 关于电子信息行业和项目管理相关论文范文2万字
[3] 项目申报和信息消费毕业论文题目范文 关于项目申报和信息消费专科毕业论文范文3000字
《基于ExcelVBA的示范建设项目管理系统开发实现》word下载【免费】
项目信息网相关论文范文资料