VB通讯方面的问题~~~~~高手请进

来源：百度知道编辑：UC知道时间：2024/05/12 00:04:39

这段代码是通讯方面的
Private Sub MSComm1_OnComm()

Dim LonInBufCountFlag As Long ' 接收缓冲区标志
Dim str1 As String '接收到的字符串
Dim IntN As Integer
Dim i As Integer

LonInBufCountFlag = MSComm1.InBufferCount
If LonInBufCountFlag > 0 Then
Sleep (100)
Do While LonInBufCountFlag <> MSComm1.InBufferCount
LonInBufCountFlag = MSComm1.InBufferCount
Sleep (100)
Loop
str1 = MSComm1.Input
Debug.Print Time$ + " 收到" + str1
LonInBufCountFlag = 0
Call ManageInput(str1)
End If

End Sub
我用串口调试程序发数据过来收到了但是读出来
谁能具体说明以下
算了谢谢大家了问题已经解决了那这分给谁呀
这样吧我在出个问题谁答对了我就给谁哈
我最喜欢的内裤是什么颜色的????

你的问题再说清楚点好不好啊? 你这段通讯代码是做不是关于阅读器方面的,还是其他方面的,说具体点?我之前做过关于条码阅读器的程序

我用串口调试程序发数据过来收到了但是读出来

你是否读不到数据？
你的代码能接收数据，显在示立即窗口内。

问题没有描述清楚

VB通讯方面的问题~~~~~高手请进 VB 串行通讯的问题 VB串口通讯问题 VB方面的问题 vb串口通讯发送问题 vb 串口通讯接收问题关于vb中用MSCOMM控件通讯的问题关于VB利用TIMER控制通讯发送的问题 VB：关于进制和通讯的问题 VB文件方面的问题