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

别把 简单问题 复杂化！
是 试试 这个
Private Sub Main_MSComm_OnComm()
Dim Buffer As Variant
Select Case Main_MSComm.CommEvent
Case comEvReceive
'Main_MSComm.InputMode = comInputModeText 注释掉
Buffer = Main_MSComm.Input
InfoText.Text = InfoText.Text & Buffer '& Chr(13) & Chr(10)
InfoText.SelLength = Len(InfoText.Text)
'Main_MSComm.InBufferCount = 0 注释掉

Case Else
Exit Sub
End Select

End Sub

注释掉 的 都是 在 设置 过程 的 语句，接收时 怎么 有 来 设置？

简单问题 复杂化了

我也想学习一下

设置一下接收延时 设个500ms应该可以了