ช่วยหน่อยครับ ผมได้ทำปุ่มแก้ไขแล้วพอรันผมจะใช้ปุ่มแก้ไขแล้วพอกดไม่ติดอ่าครับ

ReadConnectSQLServer()
        If txtContactID.Text.Trim() = "" Then
            MessageBox.Show("ไม่สามารถแก้ไขรายการได้ !!!", "ผลการทำงาน", MessageBoxButtons.OK, MessageBoxIcon.Information)
        ElseIf txtRentalID.Text.Trim() = "" Then
            MessageBox.Show("ไม่สามารถแก้ไขรายการได้ !!!", "ผลการทำงาน", MessageBoxButtons.OK, MessageBoxIcon.Information)


            Dim SqlEdit As String
            SqlEdit = "UPDATE " & tb_Name & " SET " & field1 & "='" & txtRentalID.Text & "'," & field12 & "='" & txtDesposit.Text & "' WHERE (" & fieldId & "='" & txtContactID.Text & "')"
            Dim com As New SqlCommand(SqlEdit, Conn)
            Dim result As Int16
            result = com.ExecuteNonQuery()
            If result = 0 Then
                MessageBox.Show("ไม่สามารถแก้ไขรายการได้ !!!", "ผลการทำงาน", MessageBoxButtons.OK, MessageBoxIcon.Information)
            Else
                MessageBox.Show("แก้ไขเรียบร้อยแล้ว !!!", "ผลการทำงาน", MessageBoxButtons.OK, MessageBoxIcon.Information)
            End If
            ShowData() ' แสดงข้อมูลในSQL
        End If