VB串口程序接收字符数据时数据不全！！

inputsignal

是

variant

数据

你可以

直接

textreceivetext=inputsignal

试试

推荐看书

visual_basic与_rs-232_串行通信控制

 Private Sub MSComm1_OnComm()   '串口通信事件响应

  Dim cheng As Integer

  cheng=1

  If MSComm1CommEvent = 2 Then   '收到发送方送来的数据中止位信号

      cheng=0

      '

  End If

     '

End Sub

如果用SQL数据库服务器就比较简单，但是非要用winsock来实现的话，只能参照下面：

客户端把查询字符（sql）串发给服务器，服务器根据查询字符进行查询，然后将记录集转换成数组发给客户端，客户端再将收到的数据转换为记录集显示。

Public Function RsToBin(Rs As Recordset) As Variant

Dim objStream As Stream

Set objStream = New Stream

objStreamOpen

objStreamType = adTypeBinary

RsSave objStream, adPersistADTG

objStreamPosition = 0

RsToBin = objStreamRead()

Set objStream = Nothing

End Function

Public Function BinToRs(vData As Variant) As Recordset

Dim objStream As Stream

Dim objRs As Recordset

Set objRs = New Recordset

Set objStream = New Stream

objStreamOpen

objStreamType = adTypeBinary

objStreamWrite vData

objStreamPosition = 0

objRsOpen objStream

Set BinToRs = objRs

Set objRs = Nothing

Set objStream = Nothing

End Function

第一个函数为记录集转换为数组，第二个位数据转换为记录集。

以上就是关于VB串口程序接收字符数据时数据不全！！全部的内容，包括:VB串口程序接收字符数据时数据不全！！、vb 串口接收单片机传送的数据，判断接收完成的程序错误，谢谢、要用VB写一段程序从服务器端接收数据然后写入数据库，高分求等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！