Port2Dev(i) + 1 数组元素的值+1 赋值给MSComm1(i).CommPort
MSComm1(i).InputLen = 设置inputlen属性为1(从接收缓冲区读取的字符数)
On Error GoTo lbl 发生错误是跳转到 lbl语句后面
GoTo not_ready 执行该语句是直接跳转到not_ready语句
On Error GoTo lbl 是出错后,转到lbl标签那里,goto not_ready直接转到not_ready那里。Port2Dev(i) + 1数组的值再加上1,Port2Dev(i)是数组。
MSComm1(i).InputLen = 1是设置mscomm1(i)控件的inputlen属性为1。