[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 __________________________________________________________________________

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...