串口控件的使用及属性说明0001

1、上位机软件，尤其是串口监听软件是我们常用到的工具。这里我讲解一下使用VB.NET时，串口控件的使用和串口的配置。一、认识串口控件，名称 SerialPort 。、串口常用参数说明:名称说明BaseStream族取SerialPort 对象的基础 Stream 对象。BaudRate状取或设置串行波特率。BreakState状取或设置中断信号状态。BytesToRead获取接收缓冲区中数据的字节数。BytesToWrite获取发送缓冲区中数据的字节数。CDHolding族取端口的载波检测行的状态。Container族取 IContainer ,它包含 Component 。（从 Componen

2、t 继承。）CtsHolding状取可以发送”行的状态。DataBits获取或设置每个字节的标准数据位长度。DiscardNull获取或设置一个值，该值指示Null字节在端口和接收缓冲区之间传输时是否被忽略。DsrHolding获取数据设置就绪 (DSR)彳百号的状态。DtrEnable获取或设置一个值，该值在串行通信过程中启用数据终 端就绪（DTR）信号。Encoding获取或设置传输前后文本转换的字节编码。Handshake状取或设置串行端口数据传输的握手协议。IsOpen获取一个值，该值指小 SerialPort对象的打开或关闭状态。NewLine获取或设置用于解释ReadLine和Wr

3、iteLine 方法调用结束的值。Parity状取或设置奇偶校验检查协议。ParityReplace获取或设置一个字节，该字节在发生奇偶校验错误时替 换数据流中的无效字节。PortName获取或设置通信端口，包括但不限于所有可用的COM端口。ReadBufferSize获取或设置SerialPort输入缓冲区的大小。ReadTimeout获取或设置读取操作未完成时发生超时之前的毫秒数。ReceivedBytesThreshold获取或设置DataReceived 事件发生前内舌B输入缓冲区中的字节数。RtsEnable获取或设置一个值，该值指示在串行通信中是否启用请 求发送（RTS）信号。Si

4、te获取或设置 Component 的ISite 。（从 Component 继承。）StopBits获取或设置每个字节的标准停止位数。WriteBufferSize获取或设置串行端口输出缓冲区的大小。WriteTimeout获取或设置写入操作未完成时发生超时之前的毫秒数三、代码例程1、串口配置代码Sub PortStart()'SerialPortl.PortName = COMX'列表框选择。计算机串口设置 X,是串口号。可以使用下列波特率设置SerialPort1.DataBits = 8'数据位设置SerialPort1.StopBits = StopBits.

5、One,停止位设置SerialPort1.Encoding = Encoding.UTF8SerialPort1.DtrEnable = TrueSerialPort1.ReadTimeout = 500 '超时时间SerialPort1.NewLine = vbCrLf'行结束符合End Sub2、计算机串口读取Sub GetSerialPortNames()'计算机串口读取For Each sp As String In My.Computer.Ports.SerialPortNamesCompList.Items.Add(sp)为你的下列框名称'CompL

6、ist是一个下列框控件，这里修改SerialPort1.BaudRate = 9600NextCompList.Text = CompList.Items(0)End Sub3、串口打开Sub PortOpen()TryCall PortStart()Catch ex As UnauthorizedAccessExceptionMsgBox("串口被占用或串口错误！", MsgBoxStyle.Information," 提示！。End TryEnd Sub4、串口关闭Sub PortOpen()TrySerialPort1.Close()Catch ex As

7、ExceptionMsgBox("串口未打开或串口异常!End TryEnd Sub5、串口读取数据Sub ComRec()Dim Rxstr As StringTryRxstr = SerialPort1.ReadLineApplication.DoEvents()ComTxT.AppendText(Rxstr)Catch e As TimeoutExceptionRxstr = SerialPort1.ReadExistingComTxT.AppendText(Rxstr)Application.DoEvents()End Try,MsgBoxStyle.Information," 提示！")读取一个新行读取到的数据添加到文本框中显示 '当超时以后，读取串口所有的数据End Sub6、发送数据名称说明SerialPort.Write (String)将参数字符串写入输出。由.NET Compact Framework支持。SerialPort.Write (Byte, Int32,Int32)将指定数量的字节写入输出缓冲区中的