概述：本文介紹了VB 進行串口通信的各種基本方式和三菱可編程控制器之間的通信的程序設計，重點介紹了利用MSCOMM.OCX進行串行通信的設計方法。 關鍵詞：串行通信， PLC， Visual Basic 6.0 Abstract: Describes all kinds of basic serial port communication methods using Visual Basic 6.0 and design of free port communication program of MITSUBISH PLC, furthermore set focus on the designing method of serial port communication through dynamic linked library in Visual Basic 6.0 Key Words: Serial port communication, PLC, Visual Basic 6.0 一、引言 在工業生產中，人們常常面臨著數據采集與管理。作為工廠自動化的三大支柱可編程控制器PLC（Programmable Logic Controller），由于其安全可靠，廣泛的用于數據采集與控制。生產過程中，要監視PLC內部的數據與運行狀況，選用市場上的人機界面或組態軟件，雖然功能豐富，但大都價格昂貴，在一些中小規模的生產場合，人們希望能自己用高級語言開發一個簡易實用的通信程序。微軟公司推出的Visual Basic 6.0，開發串行通信程序時，有兩種方法，一種是用Windows API函數，另一種是用VB支持的通信控件MSCOMM.OCX。利用Windows API函數是通過調用讀寫等函數來操作串口。兩種比較，使用MSCOMM.OCX控件編程方便，具有更完善的發送和接收功能。這里采用了MSCOMM.OCX控件。 本文根據杭州某包裝材料公司原料配料控制系統為背景，簡述實現計算機與三菱FX系列PLC通信的實現過程。 二、硬件與選型 日本三菱公司是國際著名的工廠自動化設備制造商，工業可編程控制器在國內市場占有率一直保持前列。項目選用三菱FX2N-64MR型PLC，SC-09電纜作為計算機與PLC通信的連線。連接電纜的9針端連接在計算機串口上，另一端連接在PLC的RS-422編程口。系統框圖如圖一所示： 三、軟件編程 軟件設計主要包括PLC梯形圖設計和計算機VB程序、數據庫設計。計算機操作系統為Windows98，編程語言用Visual Basic 6.0，數據庫選用ACESS97，梯形圖程序在三菱PLC編程軟件GPPWIN 軟件環境設計。上位機軟件實現計算機對PLC內部數據讀去、寫入參數和保存數據到數據庫。 三菱FX2N型PLC編程口通信協議如下： 數據讀取子程序： Public Function GetData(ByVal StartAddress As String, ByVal GetBytes As Integer, ByVal Hex_Bytes As String) As String MSComm1.InputLen = GetBytes * 2 + 4 MSComm1.Output = STX + CMD_Read + StartAddress + Hex_Bytes + ETX + GetSumChk(CMD_Read + StartAddress + Hex_Bytes + ETX) GetData = MSComm1.Input MSComm1.InBufferCount = 0 MSComm1.InputLen = 0 End Function 如需讀取數據，通過調用GetData子程序。 參數設置程序可參考讀取子程序，只是改變命令而已。 ACESS97數據庫中包含三個表單，包括參數表、歷史記錄表、報警記錄表。 通過如下子程序寫報警記錄到數據庫： Private Sub SaveData() Dim i As Integer Dim valid As Boolean On Error Resume Next valid = True For i = 0 To 5 If FixWeight(i) <= 0 Then valid = False Next i Data1.Recordset.AddNew Data1.Recordset.Fields("ddate") = CDate(Format(Str(OnDay) + "/" + Str(OnMonth) + "/" + Str(OnYear), "yy/mm/dd")) Data1.Recordset.Fields("dtime") = CDate(Format(Str(OnHour) + ":" + Str(OnMinute) + ":" + Str(OnSecond), "hh:mm:ss")) Data1.Recordset.Fields("ddate") = DateSerial(OnYear, OnMonth, OnDay) Data1.Recordset.Fields("dtime") = TimeSerial(OnHour, OnMinute, OnSecond) Data1.Recordset.Fields("systime") = Time Data1.Recordset.Fields("get_sl") = LF(0) Data1.Recordset.Fields("get_xl") = LF(1) Data1.Recordset.Fields("get_fjs") = LF(2) Data1.Recordset.Fields("get_cs") = LF(3) Data1.Recordset.Fields("get_sys") = LF(4) Data1.Recordset.Fields("get_cj") = LF(5) On Error Resume Next Data1.Recordset.Update ‘更新數據庫 Data1.Recordset.MovePrevious End Sub 保存參數子程序只是對數據庫操作，程序結構可參考以上子程序。 上位機與PLC通信質量的好壞，對系統的安全可靠運行影響極大，因此，編寫程序時，除了在兩者之間的通信協議上保持絕對一致和采取相應的容錯技術外，還要考慮系統的整體容錯技術，防止系統的不正常。 四、結束語 本設計中充分利用計算機和PLC的資源，在幾乎不增加設備開支的情況下實現上位機與PLC的通信和監控。 參考文獻 1、夏云 ·Windows環境下串行數據通信程序設計·PC應用，1995； 2、舒繼武·Visual Basic 中通信及應用·微型機與應用，1996；