基于Winsock控件实现PLC网络通信控制

　　SendData(0)=&H46‘FINS命令帧报头的第1个字节  

　　……  

　　WskClient.SendDataSendData()‘发送FINS命令帧  

　　EndSub  

　　‘接收PLC响应帧，并分析数据  

　　PrivateSubWskClient_DataArrival(ByValbytesTotalAsLong)  

　　DimiAsInteger  

　　ReDimArriveData(bytesTotal)AsByte  

　　wsk.GetDataArriveData,vbArray+vbByte,bytesTotal  

　　‘接收数据，保存在ArriveData数组中  

　　Fori=0TobytesTotal-1  

　　txtArData.Text=txtArData.Text&''&ArriveData(i)  

　　Nexti  

　　……‘其它数据处理  

　　IfArriveData(7)<>16Then  

　　MsgBox“接收信息丢失“  

　　ElseIfSendData(19)=ArriveData(bytesTotal-5)Then  

　　MsgBox“节点地址错误“  

　　EndIf  

　　EndIf  

　　在接收信息后,当PLC收到传输过去的信息后,会将对应的命令反馈值传回,这个事件程序内的程序将它显示在文本框中,还可作进一步处理。主程序流程图如图4所示。  

上一页  [1] [2] [3] [4] [5]  下一页

本文关键字：通信  网络  PLC入门，plc技术 - PLC入门