微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

[VB.NET]串口接收过程中怎样将末尾3位字符数据去掉?

串口接收过程中怎样将末尾3位字符数据去掉? 代码如下: 数据显示为999.9E+0 ,怎样把后面的E+0去掉? Public Sub ReceiveSerialData_GR() Dim iReceivedbytes As Integer,i As Integer Dim bReadByte() As Byte Dim SendReady As Boolean Dim strReceiveBytes As String Try SerialPort1.PortName = COM1 SerialPort1.open() SerialPort1.RtsEnable = True SerialPort1.Write(Order + vbCrLf) SendReady = SerialPort1.CtsHolding Thread.Sleep(100) If SendReady = True Then MsgBox( Ready ) Else MsgBox( Not Ready ) End If iReceivedbytes = SerialPort1.BytesToRead buffer中所有字节数 ReDim bReadByte(iReceivedbytes - 1) SerialPort1.Read(bReadByte,iReceivedbytes) For i = 0 To iReceivedbytes - 1 strReceiveBytes = CStr(bReadByte(i)) strReceiveBytes = Asc(bReadByte(i) + 32) Aod = Chr(IIf(Len(strReceiveBytes) > 1,strReceiveBytes,0 & strReceiveBytes) & ) MsgBox(Aod) TextBox1.Text = TextBox1.Text + Aod TextBox1.Text = Microsoft.VisualBasic.Right(TextBox1.Text,14) Next MsgBox(SerialPort1.ReadChar) If iReceivedbytes > 0 Then TextBox1.Text = TextBox1.Text + SerialPort1.ReadChar Else SerialPort1.RtsEnable = False SerialPort1.Close() End If Catch ex As Exception MsgBox( 接收失败 ) End Try End Sub __________________________________________________________________________ 坐个沙发不容易啊..up __________________________________________________________________________ 自己顶一下 ! __________________________________________________________________________ 看看 __________________________________________________________________________ 接完了SubString __________________________________________________________________________ 说的详细点好么? __________________________________________________________________________ str为你接收后的字符 str.Substring(0,str.LastIndexOf( E )); __________________________________________________________________________ 可能大小写上有点问题,到IDE中写一下就可以了。 __________________________________________________________________________ str1为你接收后的字符 p as integer p=str1.length-3 str1.substring(0,p) __________________________________________________________________________ xuexi __________________________________________________________________________

原文地址:https://www.jb51.cc/vb/263516.html

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。

相关推荐