[VB.NET] LINQ TO SQL ต้องการแก้ไข PRIMARY KEY ได้ ต้องทำยังไงค่ะ

Private Sub btEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btEdit.Click
        Dim result = CheckData()
        If result = True Then
            Dim edit = (From ed In db.tbl_AsVendors
                        Where ed.Vid.ToString() = txtVndId.Text.Trim()
                        Select ed).FirstOrDefault()

            If edit IsNot Nothing Then 'ถ้าไม่ใช่ ค่าว่าง
                'edit.Vid = txtVndId.Text 'LINQ TO SQL จะไม่ยอม UPDATE PRIMARY KEY ให้ ขึ้น Error
                edit.Vname = txtVndName.Text
                edit.VAddr = txtVndAddr.Text
                edit.VContactName = txtVndCont.Text
                If MessageBox.Show("คุณต้องการแก้ไขข้อมูล ใช่หรือไม่?", "คำยืนยัน", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then
                    Using ts As New TransactionScope()
                        db.SubmitChanges()
                        ts.Complete()
                    End Using
                    Clear()
                    ShowData()
                    MessageBox.Show("แก้ไขข้อมูล เรียบร้อยแล้ว", "ผลการทำงาน")
                    txtVndName.Focus()
                End If
            End If
        End If
    End Sub