松下PLC485通讯的编程步骤如下：
硬件连接
如果触摸屏或其他设备只有RS232端口，需要通过RS232到RS485的转换器进行转换。
连接时，确保正确配置转换器的参数，以便与PLC的485端口通信。
确定PLC通讯口
确定使用的PLC通讯口，例如COM1口。
定义串口参数
定义串口参数，包括波特率、数据位、停止位、校验位等。这些参数需要与PLC的通讯设置相匹配。
打开串口
使用编程软件中的串口组件打开定义的通讯口。
发送数据
使用编程软件中的串口组件向PLC发送数据。数据格式和地址需要根据PLC的通讯协议进行设置。
接收数据
使用编程软件中的串口组件从PLC接收数据。需要设置接收缓冲区和处理接收到的数据。
关闭串口
完成数据交换后，使用编程软件中的串口组件关闭串口。
编程软件
使用适当的编程软件，如Siemens Step 7、Rockwell RSLogix等，进行PLC程序的编写。
配置PLC的通讯参数，包括通讯口的地址、波特率、数据位、校验位等。
编写PLC程序，实现与其他设备的通讯和数据交换。根据不同的通讯协议，选择不同的通讯指令和数据格式。
异常处理
在编写PLC485通讯程序时，需要考虑如何处理通讯中的异常情况，如通讯中断、数据丢失等。
编写相应的异常处理程序，确保PLC485通讯能够在各种情况下正常工作。
```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） Step 2
Debug.Print Mid（recvStr, i, 2） '打印接收到的数据
Next i
End If
End Sub
```
请注意，以上代码仅作为示例，实际编程时需要根据具体的PLC型号和通讯协议进行调整。建议参考PLC制造商提供的通讯手册和编程指南，以确保正确配置和编程。