基于VB的分布式监控系统通信设计

Mscomm1.Inputlen=0             ’ 读入接收缓冲区全部字符 

Mscomm1.OutbufferSize=256      ’ 设置发送缓冲区大小

Mscomm1.InbufferSize=512       ’ 设置接收缓冲区大小

Mscomm1.PortOpen=True          ’打开

（2）        发送命令程序

比如读取节点号03的PLC中IR000到IR009的内容，并放到tag1字符串变量中，此时有：

Dim Command, node, begin, number as string

Dim Answerlen as integer