投标该任务(12) | 投诉该任务(0)
OFFICE VBA 读取某串口设备数据并处理
发布者：xf757(xf757)   发布任务：1   成交：1   历史支付：0元
任务预算：200元 任务周期：1天 要求地区：不限/不限 要求身份：兼职上班族  学生  Soho  工作室  公司   发布日期：2008年06月29日 剩余天数：0天 任务状态： 已经成交
â<设备说明书有例程\k，Ë.需要时可提供。–Áª^yateshi.com要求敬业、细致、规范。–Áª^yateshi.comŽbayateshi.com

我要投标（投标后可查看联系方式）
	您还未注册或登录，请登录后再投标
所有投标

LoveProgram(韩建华)  2008-06-30 23:47 所在地:福建/厦门 | 报价:200元 | 完工周期:5天 | 投标任务:1 | 成交任务:0 | 好评/评价:0/0 1 mscomm.vbx通信控件描述 mscomm.vbx通信控件可直接从vb的toolbox中加入窗体form，即可用其进行通信。若toolbox中无此控件，则用tools的custom controls 将mscomm.vbx从windows的system子目录中加入vb的toolbox中。 1.1 通信方式 mscomm.vbx有2种不同的方式来处理和解决各类通信软件的开发和设计问题 1、事件驱动。它与c/c++写windows 软件时的窗口回调函数类似，是1种功能强大的处理问题的方法。在实际工作中，往往要处理许多通信中的相关事件，例如：当线路数据到达本端或cd线和rts信号线状态发生变化时，要求我们使用相应的事件来跟踪和处理，该控件是使用oncomm事件来实现的，它也包括检测和处理通信错误等方面的问题，commevent 值返回最近的通信事件或错误的数字代码。通信控件详细的错误和事件举例有： mscomm-er-break 收到1个break signal mscomm-er-cdto cd 信号超时 …… mscomm-ev-cd cd信号改变 …… 2、查询方式。由程序设计者负责读取commevent的值并处理所发生的错误或事件。通常简单的应用程序设计可采用这种办法。 1.2 通信控件的属性 利用通信控件编制通信程序，关键是准确理解设置通信控件的属性。mscomm.vbx提供了27个关于通信控件方面的属性，例如： commport：设置或返回通信口编号。 settings：设置或返回以字符串形式出现的数据通信格式：波特率、校验、数据位和停 止位。 portopen：设置或返回通信口状态（包括打开和关闭1个通信口） …… 3、 实例 本程序应用背景为dcc95型静电除尘器自动监控系统软件，解决1个pc工控机（主站）与32个单片机（子站）之间的通信问题。主站与子站之间这总线式网络结构，采用rs-485通信标准，以问答方式进行数据通信。由于32个子站与主站发送通信命令（下行命令），主站在接收子站发回的相应回答命令（上行命令）后继续发送下行命令的通信形式。根据系统功能的要求，主站需发送2种类型的命令：（1）同期命令，它由定时器触发引起，每隔ls周期发送1次；（2）非周期性命令，它由操作者按动相应命令按钮引起，非周期性发送。自动监控系统软件安装在主站上，而通信程序作为自动监控系统软件的一部分也安装在主站上。 本文仅列出调试通信程序时进行试验用的基本演示程序清单。试验时，用1台pc机作为主站，另一台pc机模拟32个子站的工作，两台pc机之间采用rs232c串口通信。往主站的通信演示程序窗体（form）中加入1个通信控件、2个定时器控件和1个命令按钮控件，通信控件（mscomm1）用于访问串口，发送和接收数据；periodic定时器控件（periodic）用于控制每秒由主站向各子站发送周期性命令；命令按钮控件(nonperiodic-command)与nonperiodic定时器控件（nonperiodic）用于发送非周期性命令。数据传送采用事件驱动的通信方式，根据不同的发送命令设置rtreshlod属性，从而引起oncomm事件以接收数据。 2.1 窗体各控件初始化程序 设置通信串口工作参数，设置periodic定时器的在断间隔为ls, nonperiodic定时器的中断间隔为0.5s。 sub form-load () mscomm1.commport=2 ’选用com2串行口 mscomm1.settings=\"9600，n8，1\" ’波特率9600，无奇偶校验位，8位数据位1位停止位 mscomm1.inputlen=0 ’input将读取接收缓冲区的全部内容 mscomm1.inbuffersize=1024 ’设置接收缓冲区的字节长度 mscomm1.portopen=true ’打开通信口 mscomm1.inbuffercount=0 ’清除发送缓冲区数据 mscomm1.outbuffercount=0 ’清除接收缓冲区数据 periodic.inteval=100 ’设置ls定时间隔，使遥测命令每隔ls发送1次 nonperiodic.inteval=500 ’设置0.5s定时间隔，查询命令按钮是否处于激活状态以确定是否发送周期性命令 command-pressed=false ’命令按钮为未激活状态 during- periodic=false ’周期性命令数据传输尚未开始 during- nonperiodic=false ’非周期性命令数据传输尚未开始 end sub 2.2 非周期性命令发送程序 根据命令按钮状态及周期性命令数据传输状态，在nonperiodic定时器的中断程序中发送非周期性命令。 sub nonperiodic-command-click () command-pressed=true ’命令按钮激活 end sub sub nonperiodic-timer () if during- periodic=true or command-pressed=false then exit sub ’若周期性命令数据传输尚未结束或命令按钮处于激活状态，则退出发送非周期性命令程序。 command-pressed=false ’命令按钮恢复为未激活状态 call senddata (nonperiodic-command) ’发送非周期性命令 mscomm1.rthreshold=r-nonperiodic-byte’发送非周期性命令后，设置rthreshold属性，使主站接收所设定的字节数后引发oncomm事件 end sub 2.3 periodic定时器程序 在periodic定时器的中断程序中发送周期性命令： sub periodic-timer () if during- nonperiodic=true then exit sub ’若非周期性命令数据传输尚未结束，则退出发送非周期性命令程序。 during-periodic=true ’设置周期性命令数据传输状态为正在进行中 call senddata (periodic-command) ’发送周期性命令 mscomm1.rthreshold=r-periodic-byte ’发送周期性命令后，主站接收r-remot- edata-byte个字节，可引发oncomm 事件 end sub 2.4 oncomm事件程序 根据rthreshold属性设置值，当接收缓存区内接收到相应字节的字符时，引发oncomm事件，在中断程序中接收数据。 sub mscomm1-oncomm () select case mscomm1.commevent ’在此可插入处理各种不同错误或事件的代码 case mscomm-ev-receive receivestring$=mscomm1.input select case mscomm1.rthreshold case r-periodic-byte ’周期性命令的应答数据 call disposedata(periodic-command) ’处理接收数据 during periodic=false ’设置周期性命令数据传输状态为结束 case r-nonperiodic-byte ’非周期性命令的应答数据 call disposedata(nonperiodic-command) ’处理接收数据 during-nonperiodic=false ’设置非周期性命令数据传输状态为结束 end select end select end sub

sdhxdjw(邓泽伟)  2008-06-30 19:33 所在地:广东/佛山 | 报价:500元 | 完工周期:1天 | 投标任务:12 | 成交任务:1 | 好评/评价:0/0 串口我做得多了！ 完全可以达到你的要求！ 如有意，请联系！ QQ：89259604

huyong_sc(胡勇)  2008-06-30 13:18 所在地:四川/成都 | 报价:无 | 完工周期:无 | 投标任务:18 | 成交任务:0 | 好评/评价:0/0 本人可以解决

wenjing3087(重庆诺恩科技有限公司)  2008-06-30 09:44 所在地:重庆/南岸区 | 报价:500元 | 完工周期:20天 | 投标任务:103 | 成交任务:0 | 好评/评价:0/0 我可以，联系我。

gaojianli(asfdf)  2008-06-30 09:06 所在地:江苏/镇江 | 报价:无 | 完工周期:1天 | 投标任务:1 | 成交任务:0 | 好评/评价:0/0

hnxiaoma(小马)  成交 2008-06-29 22:20 所在地:广东/珠海 | 报价:无 | 完工周期:无 | 投标任务:302 | 成交任务:1 | 好评/评价:0/0

shzl(zz)  2008-06-29 21:20 所在地:北京/东城区 | 报价:1元 | 完工周期:1天 | 投标任务:107 | 成交任务:0 | 好评/评价:0/0 1

RealC(C)  2008-06-29 16:33 所在地:广西/桂林 | 报价:200元 | 完工周期:3天 | 投标任务:6 | 成交任务:0 | 好评/评价:0/0

Myfavorite(科锐信息系统集成)  2008-06-29 10:43 所在地:广东/深圳 | 报价:无 | 完工周期:无 | 投标任务:10 | 成交任务:0 | 好评/评价:0/0

mmm301(asdasd)  2008-06-29 09:50 所在地:河北/邢台 | 报价:无 | 完工周期:无 | 投标任务:13 | 成交任务:0 | 好评/评价:0/0

pickman(薄荷工作室)  2008-06-29 09:36 所在地:北京/海淀区 | 报价:无 | 完工周期:无 | 投标任务:70 | 成交任务:1 | 好评/评价:0/0

fengruoyouqing(兄弟工作室)  2008-06-29 09:34 所在地:黑龙江/哈尔滨 | 报价:无 | 完工周期:无 | 投标任务:49 | 成交任务:0 | 好评/评价:0/0 3

[1]