欧美成人香蕉网在线观看-欧美成人午夜做受视频-欧美成人午夜在线全部免费-欧美成人午夜影院-欧美成人午夜视频在线观看-欧美成人午夜视频免看

您好：想實(shí)現(xiàn)的功能如下：上位機(jī)vb使用USB轉(zhuǎn)485模塊和485BD通信進(jìn)行FX2N的讀寫(xiě)。
通信設(shè)置如下：
使用計(jì)算機(jī)專(zhuān)用協(xié)議，參數(shù)設(shè)置如下：波特率：9600bps;起始位1位；數(shù)據(jù)長(zhǎng)度7位；奇偶校驗(yàn)無(wú)；停止位1位；和校驗(yàn)有；站號(hào)零；協(xié)議格式采用格式1.
PLC端參數(shù)設(shè)置如下： h6080 D8120; H0 D8121; K0 8129
VB端參數(shù)設(shè)置如下：
MSComm1.CommPort = 1 ' 設(shè)置通信端口號(hào)為COM1
MSComm1.InputMode = 1 ' 接收二進(jìn)制型數(shù)據(jù)
MSComm1.RThreshold = 1 ' 設(shè)置并返回要接收的字符數(shù)
MSComm1.SThreshold = 1 ' 設(shè)置并返回發(fā)送緩沖區(qū)中允許的最小字符數(shù)
MSComm1.Settings = "9600,n,7,1" ' 設(shè)置串口1通信參數(shù)
MSComm1.PortOpen = True ' 打開(kāi)通信端口1
主程序如下：
Private Sub Command1_Click()
Dim outstring As String
MSComm1.OutBufferCount = 0
MSComm1.InBufferCount = 0
outstring = Chr(&H5) + "00FFBT003M00501S01000Y00011" + Chr(&H45) + Chr(&H43) ‘M50開(kāi)，S100關(guān)；Y001開(kāi)。
Text1.Text = outstring
MSComm1.Output = outstring
Text2.Text = MSComm1.Input
End Sub
問(wèn)題如下：運(yùn)行vb后點(diǎn)擊發(fā)送，485BD模塊的接收和發(fā)射指示燈閃爍，但是Y001并沒(méi)有置一。請(qǐng)問(wèn)是發(fā)送的命令錯(cuò)誤還是通信錯(cuò)誤？謝謝！

上述情況和校驗(yàn)不對(duì)，站號(hào)設(shè)置為0號(hào)站，上述報(bào)文的和校驗(yàn)就不是4543了，沒(méi)有編寫(xiě)計(jì)算和校驗(yàn)的程序的話(huà)，應(yīng)該設(shè)置不使用和校驗(yàn)，H6080 D8120改為H4080 D8120。

成功了！很感謝你的熱情幫助，祝你每天都有好心情。

不客氣，很高興能為您解決疑問(wèn)，歡迎您再次留言，或撥打我們的技術(shù)支持熱線400--。