利用winscok控件實(shí)現(xiàn)vb與plc的以太網(wǎng)通信-資料下載頁
2025-06-16 22:23本頁面
【正文】 o i 1 s = s + Hex(strdata(j)) Next If s Like *5* Then s1 = Mid(s， 12， 2) If s1 = FF Then IO = 1 a = amp。H0 Else IO = 0 a = amp。HFF End If If IO = 1 Then = RGB(0， 255， 0) 39。green = IO點(diǎn)接通 Else = RGB(255， 0， 0) 39。red = IO點(diǎn)斷開 End If End If If s Like *3* Then = + Mid(s， 11) + End If （4）、讀多個寄存器數(shù)據(jù) End Sub Private Sub Command4_Click() On Error GoTo ErrProc Dim str (12) As Byte str(0) = amp。H0 39。交換識別號高字節(jié)，通常為 0 str(1) = amp。H0 39。交換識別號低字節(jié)，通常為 0 str(2) = amp。H0 39。，為 0 str(3) = amp。H0 39。協(xié)議識別號低字節(jié)，為 0 str(4) = amp。H0 39。字節(jié)長度高字節(jié) str(5) = amp。H6 39。以下字節(jié)長度低字節(jié) str(6) = amp。HFF 39。單元識別號控制工程網(wǎng)版權(quán)所有，確省為 255 str(7) = amp。H3 39。讀多個寄存器命令代碼 str(8) = amp。H10 39。讀數(shù)據(jù)的起始地址高字節(jié) str(9) = amp。HC8 39。讀數(shù)據(jù)的起始地址低字節(jié) str(10) = amp。H0 39。數(shù)據(jù)長度高字節(jié) str(11) = amp。H1 39。數(shù)據(jù)長度低字節(jié) Dim bStr As String Dim i As Integer For i = 0 To 11 bStr = bStr amp。 Chr(str(i)) Next bStr Exit Sub ErrProc: MsgBox 傳輸數(shù)據(jù)失敗， VBCritical， 網(wǎng)絡(luò)傳輸 End Sub D100寄存器的寫入操作類似CONTROL ENGINEERING China版權(quán)所有，由于篇幅所限其他代碼在此就不再贅述?！ ?．結(jié)速語 工業(yè)以太網(wǎng)是工業(yè)自動化網(wǎng)絡(luò)發(fā)展的必然趨勢，為了對工業(yè)設(shè)備進(jìn)行實(shí)時的管理與監(jiān)控，工業(yè)以太網(wǎng)設(shè)備大多都支持遠(yuǎn)程管理，而且各廠商業(yè)都有各自的網(wǎng)絡(luò)管理軟件以提供對網(wǎng)絡(luò)設(shè)備進(jìn)行友好的圖形化界面操作。管理員還可以通過遠(yuǎn)程telnet或web界面的方式直接對設(shè)備進(jìn)行調(diào)試。完善的兼容性，可靠的穩(wěn)定性，對惡劣環(huán)境的適應(yīng)性CONTROL ENGINEERING China版權(quán)所有，強(qiáng)大的冗余能力和方便的可管理性，是人們越來越多地在網(wǎng)絡(luò)設(shè)計過程中采用工業(yè)以太網(wǎng)的原因，而這也勢必成為工業(yè)以太網(wǎng)在越來越多的網(wǎng)絡(luò)環(huán)境里大顯身手的重要契機(jī)。借臺達(dá)即將推出以太網(wǎng)模塊之際撰寫此文，希望能夠?yàn)槠湟蕴W(wǎng)模塊的推廣提供一些幫助。，也請讀者給予批評指正。11 / 11
研究報告相關(guān)推薦
鄂ICP備17016276號-1