以前调试设备使用过很多次，现在将这些功能整合，可以作为松下PLC与上位机VB通信的初级教程。有多个应用，以下为部分。 Public Function ImadacommPanasonic(Mymscomm As MSComm, ByVal id As Integer) Mymscomm.CommPort = id Mymscomm.Settings = "9600,o,8,1" Mymscomm.InBufferSize = 1024 Mymscomm.OutBufferSize = 512 Mymscomm.InputLen = 0 Mymscomm.InputMode = comInput