Question

求大神教如何用VBA读取并发送串口数据 mscomm函数我知道，具体操作不太清楚。

mscomm控件注册好了 VBA添加了电话图标的控件，然后怎样就不知道了。
我用串口助手自发自收，VBA可以检测到 然后读取出来吗？
小弟比较笨，麻烦请大神传附件解答 万分感谢！

Answer 1

Private Sub NETComm1_OnComm()
Dim t1 As Long, str1 As String
t1 = Timer
Select Case NETComm1.CommEvent
Case comEvReceive
Do
DoEvents
Loop While Timer - t1 < 1.5
com_String = NETComm1.InputData
stop '加上这句，当程序暂停时把鼠标指针放到com_String上看。
End Select
End Sub