Updatebinding VB.Net เออเร่อแก้มาหลายวันแล้วค่ะ ไม่ได้สักที T_T

กระทู้คำถาม
คือเราทำโปรเจ็คจบซึ่งทำเอง แล้วมันเกิดปัญหา error แบบนี้อยู่นานมาก แก้มาสองวันแล้วไม่รุ้จะแก้ยังไง ใครพอรู้ช่วยแนะนำหน่อยค่ะ
พอกดปุ่มเพิ่ม บันทึก ลบ แก้ไข ก็จะแจ้งแบบนี้หมดเลยค่ะ แต่พอเข้าไปดูในฐานข้อมูล ข้อมูลก็เข้านะคะ ไม่รู้ว่าเป็นเพราะอะไร T_T

Private Sub UpdateBinding()
        For Each ctrl As Control In Me.Controls
            ctrl.DataBindings.Clear()
            If TypeOf ctrl Is TextBox Then
                ctrl.Text = ""
            End If
        Next

        sql = "SELECT * FROM equipment"

        command = New SqlCommand(sql, connection)
        adapter = New SqlDataAdapter(command)
        dataSt = New DataSet()
        adapter.Fill(dataSt, "equipment")

        ListBox1.DataSource = dataSt.Tables("equipment")
        ListBox1.DisplayMember = "equ_name"
        ListBox1.SelectedIndex = 0

        bindingSrc = New BindingSource()
        bindingSrc.DataSource = dataSt.Tables("equipment")

        txtIDequ.DataBindings.Add("Text", bindingSrc, "equ_ID") ---// มันแจ้ง error ตรงนี้ ว่า "This causes two bindings in the collection to bind to the same property.Parameter name: binding"

        cmbtype.DataBindings.Add("Text", bindingSrc, "equ_type")
        txtnameequ.DataBindings.Add("Text", bindingSrc, "equ_name")
        txtserial.DataBindings.Add("Text", bindingSrc, "equ_serial")
        DateImport.DataBindings.Add("Value", bindingSrc, "equ_date")
        cmbstatus.DataBindings.Add("Text", bindingSrc, "equ_status")
    End Sub
แก้ไขข้อความเมื่อ
แสดงความคิดเห็น
Preview
โปรดศึกษาและยอมรับนโยบายข้อมูลส่วนบุคคลก่อนเริ่มใช้งาน อ่านเพิ่มเติมได้ที่นี่