vbnet开发全功能串口调试助手

vbnet开发全功能串口调试助手

ID:35733119

大小:88.50 KB

页数:7页

时间:2019-04-15

vbnet开发全功能串口调试助手_第1页
vbnet开发全功能串口调试助手_第2页
vbnet开发全功能串口调试助手_第3页
vbnet开发全功能串口调试助手_第4页
vbnet开发全功能串口调试助手_第5页
资源描述:

《vbnet开发全功能串口调试助手》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、.VB.NET开发全功能串口调试助手(含完整工程) 小记:VB.NET的串口通信用了很长时间了,也只用Write和Read这样的方法,以前都是用这种方式做上位机软件,如此足矣。而前几天研究GSM模块时对串口返回的数据总是把握不好,参考开发板附送的例程,发现采用SerialPort的DataReceived事件,可以实现中断触发式的数据接收。于是想到要自己做一个串口调试助手,在实现基本功能的前提下增加一些方便自己调试的功能。经过断断续续的编写,就做成了下面这个小软件:  这个软件能够实现串口调试助手的全部功能,经过通信测试,数据接收性能不亚于呼啸工作室的SComAs

2、sistant2.2,通过加大输入缓冲区,可以满足大量数据接收。VB.NET的串口通信主要使用VS自带的SerialPort控件,而不是早先的MSComm,更具有兼容性,这也是很久以前就放弃VB改用.NET的直接原因。该控件的主要方法、属性如下(该数据来自VS的MSDN帮助库): ...方法说明Open打开一个新的串行端口连接。Close关闭端口连接,将 IsOpen 属性设置为 false,并释放内部 Stream对象。Read已重载。 从 SerialPort 输入缓冲区中读取。ReadByte从 SerialPort 输入缓冲区中同步读取一个字节。ReadC

3、har从 SerialPort 输入缓冲区中同步读取一个字符。ReadExisting在编码的基础上,读取 SerialPort 对象的流和输入缓冲区中所有立即可用的字节。ReadLine一直读取到输入缓冲区中的 NewLine 值。ReadTo一直读取到输入缓冲区中的指定 value 的字符串。Write已重载。 将数据写入串行端口输出缓冲区。WriteLine将指定的字符串和 NewLine 值写入输出缓冲区。DiscardInBuffer丢弃来自串行驱动程序的接收缓冲区的数据。DiscardOutBuffer丢弃来自串行驱动程序的传输缓冲区的数据。GetPo

4、rtNames获取当前计算机的串行端口名称数组。属性说明PortName获取或设置通信端口,包括但不限于所有可用的 COM 端口。BaudRate获取或设置串行波特率。DataBits获取或设置每个字节的标准数据位长度。Parity获取或设置奇偶校验检查协议。StopBits获取或设置每个字节的标准停止位数。IsOpen获取一个值,该值指示 SerialPort 对象的打开或关闭状态。BytesToRead获取接收缓冲区中数据的字节数。BytesToWrite获取发送缓冲区中数据的字节数。Encoding获取或设置传输前后文本转换的字节编码。ReadBufferS

5、ize获取或设置 SerialPort 输入缓冲区的大小。ReceivedBytesThreshold获取或设置 DataReceived 事件发生前内部输入缓冲区中的字节数。WriteBufferSize获取或设置串行端口输出缓冲区的大小。 想要通过串口收发数据,就需要对串口进行配置,包括设置端口、波特率、数据格式(如COM1端口、9600bps、8位数据位、无校验位、1位停止位)等属性,之后通过Open方法打开串口。打开串口可通过手动指定,也可以使用GetPortNames方法获取计算机中存在的串口。如果打开出错,则可能是串口不存在或者已被占用。下面是相应代码

6、:...    Private Sub SerialPortOpen()        On Error GoTo Err        If SerialPort.IsOpen= True Then SerialPort.Close() '避免重复打开端口        SerialPort.Open()        LabelCOMStatus.Text= "串口已打开"        Exit Sub Err:    MsgBox("串口不存在或已被占用!" +vbNewLine+ErrorToString()) '出现错误,显示错误信息    End S

7、ub 如果想要在串口中支持中文字符收发,则可在初始化时设置串口控件的编码:SerialPort.Encoding=System.Text.Encoding.Default 发送数据通过Write方法来完成,由于串口调试助手需要支持文本和16进制,需要加入转换代码:    Private Sub ButtonSendData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonSendData.Click        On Error GoTo Err   

8、     

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。