为什么只能发送1k的数据啊?后来的都没有了 Dim bt() As Byte
ReDim bt(4095)
MSCom.PortOpen = True
MSCom.Output = bt
Do Until mscom.OutBufferCount = 0
DoEvents
Loop
MSCom.PortOpen = False用工具监测串口看到只发送了1k的,剩下的3k都没发
ReDim bt(4095)
MSCom.PortOpen = True
MSCom.Output = bt
Do Until mscom.OutBufferCount = 0
DoEvents
Loop
MSCom.PortOpen = False用工具监测串口看到只发送了1k的,剩下的3k都没发
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货