软件课程设计报告-北京科技大学.doc

软件课程设计报告-北京科技大学.doc

  1. 1、本文档共28页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多

北京科技大学

课程设计(软件设计)

报告

班级:

姓名:

学号:

指导教师:

日期:年月日

目录

TOC\o1-3\h\z\u1设计内容 1

2应用程序总体分析与设计 1

3应用程序各功能模块分析与设计 2

3.1连接服务器 2

3.2加项 3

3.3读取数据 5

3.4显示与隐藏 7

3.5暂停与继续 9

3.6报表与记录 10

4程序测试 11

4.1测试过程 11

4.1.1连接测试 11

4.1.2显示与隐藏测试 11

4.1.3暂停按钮 12

4.1.4数据保存 12

4.2测试结果 12

4.2.1连接结果 12

4.2.2显示与隐藏结果 13

4.2.3暂停显示 13

4.2.4数据保存结果 14

5程序文档 14

5.1使用说明 14

5.2程序说明 15

6学习收获 27

1设计内容

OPC(OLEforProcessControl)又称为过程控制的对象连接与嵌入技术。它是它的出现为基于Windows的应用程序和现场过程控制应用建立了桥梁。在过去,为了存取现场设备的数据信息,每一个应用软件开发商都需要编写专用的接口函数。由于现场设备的种类繁多,且产品的不断升级,往往给用户和软件开发商带来了巨大的工作负担。通常这样也不能满足工作的实际需要,系统集成商和开发商急切需要一种具有高效性、可靠性、开放性、可互操作性的即插即用的设备驱动程序。在这种情况下,OPC标准应运而生。OPC标准以微软公司的OLE技术为基础,它的制定是通过提供一套标准的OLE/接口完成的,在OPC技术中使用的是OLE2技术,OLE标准允许多台微机之间交换文档、图形等对象。

OPC的出现大大缩短了软件开发的时间。本次课程设计就是要求使用VB设计一个简单的客户端程序,这个程序能读取本机服务器上面的数据,并以直观的柱形图显示出来。另外,还应该添加一些别的功能。

2应用程序总体分析与设计

开始为了能连接服务器,首先在PC机运行模拟的服务器。然后,在VB6.0环境下,创建各种用于显示数据和控制的控件。给每一个控件添加事件响应函数。程序运行的流程如下:

开始

退出显示与保存读取数据添加Item连接服务器

退出

显示与保存

读取数据

添加Item

连接服务器

3应用程序各功能模块分析与设计

3.1连接服务器

首先使用new关键字创建一个OPC对象,然后调用Connect方法连接到服务器。然后书写连接按钮的响应函数。

PrivateSubBtnConnnect_Click()

调用Connect子程序

CallConnect(OPCJ.SampleServer.1)

EndSub

SubConnect(strProgIDAsString,OptionalstrNodeAsString)

IfobjServerIsNothingThen

建立一个OPC服务器对象

SetobjServer=NewOPCServer

EndIf

IfobjServer.ServerState=OPCDisconnectedThen

连接OPC服务器

objServer.ConnectstrProgID,strNode

EndIf

IfobjGroupsIsNothingThen

建立一个OPC组集合

SetobjGroups=objServer.OPCGroups

EndIf

IfobjTestGrpIsNothingThen

添加一个OPC组

SetobjTestGrp=objGroups.Add(TestGrp)

EndIf

EndSub

3.2加项

对OPC服务器进行访问前,必须先在OPC组里添加要访问的OPC标签。这里添加OPC标签的标识符和数目是固定的,但是实际的OPC应用程序往往要按照用户的指定或读取组态文件取得和处理需要添加OPC标签。

SubAddItem()

DimstrItemIDs(2)AsS

您可能关注的文档

文档评论(0)

134****1793 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档