刚刚写完多段读代码，奉献各位 WWW_PLCJS@_COM%－PLC－技.术_网
WWcW_PLCJS_COM－PLC－技.术_网
Public Function S7200_Group_read(comDEv As Object, QBStart As Integer, QBcount As Integer, _ WW.W_PLCJS_COM－PLC－技.术_网
IBStart As Integer, IBcount As Integer, MBStart As Integer, MBcount As Integer) WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)
If Vwcount > 111 Then 数量限制 WWcW_PLCJS_COM－PLC－技.术_网
WW.W_PLC※JS_C,OM－PL,C－技.术_网
MsgBox "输入数量大于最大允许值(111pcs)...", vbOKOnly + vbCritical, "PPI communication error..." WWW_PLCJS@_COM%－PLC－技.术_网
Exit Function WWW_PLCJS_COM－PLC－技.术_网
End If WWW_PL※CJS_COM－PLC－技.术_网
Dim str_read(0 To 56) As Byte WWW_PL※CJS_COM－PLC－技.术_网
Dim I As Integer ——可——编——程——控－制－器－技——术——门——户
Dim Temp_FCS As Variant WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)
str_read(0) = &H68 SD 起始符 WWW_PL※CJS_COM－PLC－技.术_网
str_read(1) = &H33 LE （15+12*组数） WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)
str_read(2) = &H33 LEs （15+12*组数） plcjs.技.术_网
str_read(3) = &H68 SD 起始符 WWW_PLC※JS_COM－PmLC－技.术_网
str_read(4) = &H2 DA 目的地址 P.L.C.技.术.网——可编程控制器技术门户
str_read(5) = &H0 SA 主站地址 WWW_PLC※JS_COM－PmLC－技.术_网