以下是PLC 485通讯编程实例：

1. 确定PLC通讯口：首先需要确定使用的PLC通讯口，例如COM1口。

2. 定义串口参数：定义串口参数，包括波特率、数据位、停止位、校验位等。

3. 打开串口：使用COM组件打开串口。

4. 发送数据：使用COM组件向PLC发送数据。

5. 接收数据：使用COM组件从PLC接收数据。

6. 关闭串口：使用COM组件关闭串口。

以下是示例代码：

```

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

Private Sub Form_Unload(Cancel As Integer)

com.PortOpen = False '关闭串口

Set com = Nothing

End Sub

```

以上代码示例为VB6.0代码，使用了MSComm控件进行串口通讯。在实际应用中，需要根据具体PLC型号和通讯协议进行编程。