作者gecer (gecer)
看板Visual_Basic
標題[VBA ]請問visual basic 2010如何跟delta plc通訓
時間Sun Dec 1 14:01:45 2013
小弟初學 要開啟M0
M0 address 是0800所以根據plc的datasheet 傳送訊息為: 01 05 08 00 FF 00 F6 CR LF
小弟程式碼如下
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim Port As String
SerialPort1.PortName = "COM6"
SerialPort1.BaudRate = 9600
SerialPort1.DataBits = 7
SerialPort1.Parity = IO.Ports.Parity.Even
SerialPort1.StopBits = 1
SerialPort1.Open()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
SerialPort1.WriteLine(
":01050800FF00F6CRLF")
End Sub
End Class
不過plc沒有反應 請問要如何修改程式 謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 1.173.167.10
1F：推 johnpage:bin <> string 12/01 17:12
可以請教樓上是什麼意思嗎?
※ 編輯: gecer 來自: 1.173.167.10 (12/01 18:45)
我知道了 CR LF要輸入 chr(對應的ASCII) 另外LRC算錯了 所以紅色那一行是
":01050800FF00" & "F3" & Chr(13) & Chr(10)
※ 編輯: gecer 來自: 218.164.4.172 (12/02 16:21)
※ 編輯: gecer 來自: 218.164.4.172 (12/02 16:23)
※ 編輯: gecer 來自: 218.173.183.103 (12/03 08:57)