Red de conocimiento informático - Problemas con los teléfonos móviles - VB se comunica con Siemens S7-200PLC a través del código fuente del programa Ethernet

VB se comunica con Siemens S7-200PLC a través del código fuente del programa Ethernet

Hice los de Delta y los de Siemens son iguales, puedes consultarlos

Private Sub Command1_Click()

Dim strout As String

Dim str As String

Timer1.Enabled = False

str = "00050C30FF00" 'M1072 es el indicador de inicio y parada del PLC. Verifique la tabla de direcciones, M1072 es OC30, FF00 está configurado en ON y 0000 está configurado en OFF.

'Los anteriores son todos formatos fijos, así que recuérdelos.

LRCC = LRC(str) 'Calcula el código de verificación lrc de str.

strout = ":" + str + LRCC + Chr$(13) + Chr$(10) 'Datos a enviar. 13 es D, 10 es A

MSComm1.Output = strout

Timer1.Enabled = True

End Sub