Visual Studio connect PLC Panasonic (RS232RS485) CVB.NET.1.Giới thiệu về Phần mềm Visual Studio2.Giới thiệu về PLC Panasonic.3.Giới thiệu về phần mềm FP WinGR4.Hưỡng dẫn viết chương trình Window Form Kết nối PLC Panasonic5.Hưỡng dẫn đọc dữ liệu DT,X,Y,R,EV,SV từ PLC Panasonic lên Window Form6.Hưỡng dẫn ghi dữ liệu DT,X,Y,R,EV,SV từ Window Form xuống PLC Panasonic7.Hưỡng dẫn viết chương trình điều khiển Bơm bằng Sofware viết bằng Visualstudio(CVB.NET)
Visual Studio connect PLC Panasonic (RS232-RS485) C#-VB.net LOB Monitoring LOB Monitoring Data Excel ATN Ass'y Sub Ant Screw RF Cal ANT/NFC Ass’y Back cover press Grip test LCIA Vision test Write IMEI LOB GIỜ NGÀY 11.32 8.91 15 46.15 40.91 33.33 17.48 18.75 2.31 46.75 15:33:22 8/24/2020 11.25 8.87 14.63 21.95 36.73 72 33.96 138.46 2.18 27.29 15:03:22 8/24/2020 10.11 10.29 9.47 10.78 8.78 8.41 7.14 12.5 12.33 12 11.46 450 1800 1800 17.14 94.74 112.5 43.9 9.09 66.67 900 18.75 16.67 12.68 11.61 7.06 8.65 64.29 20.93 11.54 12.95 3.12 2.48 2.31 2.94 17.85 17.77 11.81 62.76 14:33:21 14:03:22 13:33:22 13:03:22 8/24/2020 8/24/2020 8/24/2020 8/24/2020 9.78 8.22 11.61 10.98 8.96 16.36 8.29 10.98 2.98 59.88 12:33:23 8/24/2020 9.18 8.74 10.71 12.24 14.52 13.43 7.38 11.11 2.41 68.66 11:13:24 8/24/2020 9.78 9.05 9.52 9.63 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 138.46 12.5 8.49 7.23 7.73 8.14 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 300 10.78 11.92 13.74 11.69 14.52 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 37.5 12.24 21.95 8.78 8.74 10.17 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 11.18 12.59 8.53 8.96 8.91 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 8.37 11.84 16.22 15.65 17.31 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 25.71 7.23 10.11 14.29 1800 1800 900 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 10.06 8.65 10.65 21.69 22.22 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 14.17 2.69 2.53 2.92 2.71 1800 1800 78.26 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 1800 2.98 2.14 48.16 58.04 49.7 53.96 100 100 83.82 100 100 100 100 100 100 100 100 100 100 100 58.51 46.31 10:43:24 09:33:21 09:03:21 08:33:21 16:39:52 16:09:52 15:29:53 14:59:53 14:29:53 13:59:53 13:29:54 12:59:55 12:29:55 11:09:55 10:39:56 09:59:57 09:29:58 08:59:59 08:29:59 02:52:17 8/24/2020 8/24/2020 8/24/2020 8/24/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 8/22/2020 THỨ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ Thứ SHIFT Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Day Shift Night PLC Program Visual Code Server Visual Code Connect PLC Quản lý Nhiệt Độ - Độ Ẩm Data History Chart View Add thư viện Project -> Add Reference -> Browse -> Chọn FP_CONECT.tb -> OK Add OK Code 1.Khai báo biến làm việc Biến Khởi tạo kết nối 2.Show parameter Kết nối OK đọc Parameter Read Data from PLC 2.Tạo Buton textbox Add code vaof Buton Chạy chương trình b ReadDT100 để đọc g trị lên Texbox1 3.Read X,Y,R…… Thay đổi đối tượng cần đọc giá trị Buton3 TexBox2 Với Y,R làm tương tự = -> Of =1 -> ON Write Data from PLC 1.Tạo Form Khác với Read với kiện Write Data xuống PLC ta Write vào DT R (Biến trung gian) Để điều khiển Y kiện chương trình Code Write DT Kích đúp vào 2.code Write R = -> Of =1 -> ON Ví Dụ ON/OFF Bơm nước qua phần mềm 1.Code PLC 2.Thiết kế giao diện điều khiển Picturebox1 Picturebox2 Buton Timer1 để load trạng thái Bơm từ PLC lên Sofware tự động 1s lần label TextBox Kéo thả chồng pictureBox lên PictureBox1 3.Code Public Class Form1 Public oxcFP_CONNECT As FP_CONNECTLib.FP_CONNECT Private OPEN_PLC As Integer Private NO_FP_CONNECT_ERROR As Integer Dim a As Int16 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load oxcFP_CONNECT = New FP_CONNECTLib.FP_CONNECT oxcFP_CONNECT.AtachHostHandle(Handle) Timer1.Enabled = True PictureON.Visible = False PictureOFF.Visible = False a=0 End Sub Private Sub Buton1_Click(sender As Object, e As EventArgs) Handles Buton1.Click Dim plcData(10) As Integer Dim strErrorMsg As String Dim nWord2Write As Integer Dim nStatonNumber As Integer nStatonNumber = nWord2Write = strErrorMsg = "" If a = Then Buton1.Text = "ON" a=0 Try plcData(0) = Catch ex As Excepton Exit Sub End Try If oxcFP_CONNECT.PortOpen(OPEN_PLC, nStatonNumber) NO_FP_CONNECT_ERROR Then oxcFP_CONNECT.PortClose() Exit Sub End If oxcFP_CONNECT.WriteINT(nStatonNumber, "R0", nWord2Write, plcData, strErrorMsg) oxcFP_CONNECT.PortClose() ElseIf a = Then Buton1.Text = "Of" a=1 Try plcData(0) = Catch ex As Excepton Exit Sub End Try If oxcFP_CONNECT.PortOpen(OPEN_PLC, nStatonNumber) NO_FP_CONNECT_ERROR Then oxcFP_CONNECT.PortClose() Exit Sub End If oxcFP_CONNECT.WriteINT(nStatonNumber, "R0", nWord2Write, plcData, strErrorMsg) oxcFP_CONNECT.PortClose() End If End Sub Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick Try Dim plcData As System.Array Dim strErrorMsg As String Dim nWords2Read As Integer Dim nStatonNumber As Integer nStatonNumber = strErrorMsg = "" nWords2Read = If oxcFP_CONNECT.PortOpen(OPEN_PLC, nStatonNumber) NO_FP_CONNECT_ERROR Then oxcFP_CONNECT.PortClose() MsgBox("1") Exit Sub End If plcData = oxcFP_CONNECT.AreaRead(nStatonNumber, "Y0", nWords2Read, strErrorMsg) oxcFP_CONNECT.PortClose() If plcData Is Nothing Then MsgBox("2") Exit Sub End If If strErrorMsg.Length = Then TxtBOM.Text = Str(plcData(0)) Else TxtBOM.Text = strErrorMsg End If Catch ex As Excepton MsgBox("NG") End Try If TxtBOM.Text = Then PictureON.Visible = True PictureOFF.Visible = False ElseIf TxtBOM.Text = Then PictureON.Visible = False PictureOFF.Visible = True End If End Sub End Class Nhấn ON Nhấn OFF THANK Với thao tác hoàn toàn làm chủ PLC Panasonic Cần them chút kĩ lập trình Visustadio kĩ đồ họa chũng ta tạo phần mềm điều khiển hiển thị kết nối PC PLC Chúc Các Bạn Thành Công ... FPpconnect2102 (Thư viện giao tếp với PLC Panasonic) Nào bắt đầu code !! I.Kết nối PC với PLC 1 .C? ??p nguồn cho PLC c? ??m c? ?p kết nối với PC Kiểm tra c? ??ng Com: Code PLC Mở phần mềm FPWinGR setting com... Với PLC Phần c? ??ng: PLC Panasonic c? ? kết nối RS232 cable kết nối từ PC xuống PLC Phần mềm Visual studio 2015 (C? ?c bạn sử dụng phiên kh? ?c) Phần mềm FPWinGR (Code cho PLC) Sofware FPpconnect2102... Try plcData(0) = Catch ex As Excepton Exit Sub End Try If oxcFP_CONNECT.PortOpen(OPEN _PLC, nStatonNumber) NO_FP_CONNECT_ERROR Then oxcFP_CONNECT.PortClose() Exit Sub End If oxcFP_CONNECT.WriteINT(nStatonNumber,