施耐德PLC 485通讯的编程步骤如下：
确定PLC通讯口
确定使用的PLC通讯口，例如COM1口。
定义串口参数
定义串口参数，包括波特率、数据位、停止位、校验位等。
打开串口
使用COM组件打开串口。
发送数据
使用COM组件向PLC发送数据。
接收数据
使用COM组件从PLC接收数据。
关闭串口
使用COM组件关闭串口。
```vb
Dim com As New MSComm
Private Sub Form_Load（）
com.CommPort = 1 '指定COM1口
com.Settings = "9600,N,8,1" '设置串口参数
com.PortOpen = True '打开串口
End Sub
Private Sub btnSend_Click（）
Dim sendStr As String
sendStr = "01 03 00 00 00 10 44 0C" '发送的数据
com.Output = sendStr '发送数据
End Sub
Private Sub com_OnComm（）
Dim recvStr As String
Dim i As Integer
If com.CommEvent = comEvReceive Then '接收到数据
recvStr = com.Input '读取接收到的数据
For i = 1 To Len（recvStr）
'处理接收到的数据
Next i
End If
End Sub
```
建议
确保硬件连接正确：
在连接PLC和Modbus 485模块时，确保接线方式正确，避免短路或断路。
参数设置一致：
确保上位机和下位机的参数设置一致，包括波特率、数据位、停止位和校验位等。
使用合适的编程软件：
根据PLC型号选择合适的编程软件，如Siemens Step 7、Rockwell RSLogix等。
测试与调试：
使用串口调试助手或其他通讯测试工具，对Modbus通讯进行测试，确保通讯正常。
通过以上步骤，可以实现施耐德PLC 485通讯的编程和调试。