1 / 57
文档名称:

VB串口通信程序代码.doc

格式:doc   页数:57页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

VB串口通信程序代码.doc

上传人:ffy51856fy 2016/2/28 文件大小:0 KB

下载得到文件列表

VB串口通信程序代码.doc

文档介绍

文档介绍:m控件实现串口通信本问分两部分均来自jessezappy(晶晶)===================================================================================mPort=1'1口'设定传输速率等,="9600,N,8,1"=True'---------初始化Modem-------------="ATZ"="AT&F"="ATE0"="ATM1"="ATQ0"="ATV0"'--------------------------拨号-------------="ATDT163"'拨163'---------------------------="SDFJDKSJLKFA"'发送字符串'---------------------m()'用串口事件捕捉数据..'通讯埠中假如有资料的话,则读取进来InStringB=InStringB&'如果资料中有Chr(13)和Chr(10)的话,则显示出来IfInStr(InStringB,vbCrLf)Theninstring=instring&InStringBAddTextText3,InStringB,FalseInStringB=""EndIfEndIfENDSUB'-------------------------挂断--------=False'这个挂断方法不能适用所有MODEM,我正在研究...通用办法================================================================================================第二部分:===========================================================================最后借你一篇文章看,作者不是我,里面的不一定都对..'-----------------------------------------------------------m控件应用江苏戚墅堰机车车辆厂设计处(213011)李秉璋--------------------------------------------------------------------------------(以下简称VB)是一种功能强大、简单易学的程序设计语言。它不但保留了原先Basic语言的全部功能,而且还增加了面向对象程序设计功能。它不仅可以方便快捷地编制适用于数据处理、多媒体等方面的程序,m还能十分方便地开发出使用计算机串口的计算机通信程序。本文结合计算机通信的两个例子,m控件。m控件提供了两种处理通信的方式:一种为事件驱动方式,该方式相当于一般程序设计中的中断方式。当串口发生事件或错误时,m事件,用户程序可以捕获该事件进行相应处理。本文的两个例子均采用该方式。另一种为查询方式,m控件的某些属性是否发生变化,从而确定相应处理。在程序空闲时间较多时可以采用该方式。m控件众多属性和方法。m控件的常用属性和方法:●Commport:设置或返回串口号。●Settings:以字符串的形式设置或返回串口通信参数。●Portopen:设置或返回串口状态。●InputMode:设置或返回接收数据的类型。●Inputlen:设置或返回一次从接收缓冲区中读取字节数。●InBufferSize:设置或返回接收缓冲区的大小,缺省值为1024字节。●InBufferCount:设置或返回接收缓冲区中等待计算机接收的字符数。●Input:从接收缓冲区中读取数据并清空该缓冲区,该属性设计时无效,运行时只读。●OutBufferSize:设置或返回发送缓冲区的大小,缺省值为512字节。●OutBufferCount:设置或返回发送缓冲区中等待计算机发送的字符数。●Output:向发送缓冲区发送数据,该属性设计时无效,运行时只读。●Rthreshold:该属性为一阀值。当接收缓冲区中字符数达到该值时,EvReceive,m事件。m事件处理程序中进行相应处理。若Rthreshold属性设置为0,m事件。例如用户希望接收缓冲区中达到一个字符就接收一个字符,可将Rthreshold设置为1。这样接收缓冲区中接收到一个字符,m事件。●Sthreshold:该属性亦为一阀值。当发送缓冲区中字符数小于该值时,