Q:

Syntax error in UPDATE statement vb and ms.access as database

I am trying to make medical record application for my assignment. I found this error to edit data patient. 
Please help and sorry for my bad grammar
Dim aksesedit As String = "Update tbpasien set " & _
                "Nama_Pasien='" & txtnamapasien.Text & "', " & _
                "Jenis_Kelamin='" & cmbjk.Text & "'," & _
                "Tempat_Pasien='" & txttempatlahir.Text & "', " & _
                "Tanggal_Lahir='" & tanggallahir.Text & "', " & _
                "Alamat='" & txtalamat.Text & "', " & _
                "Kelurahan_Desa='" & txtkeldesa.Text & "', " & _
                "Kecamatan='" & txtkec.Text & "', " & _
                "Kota_Kabupaten='" & txtkotakab.Text & "', " & _
                "No_Telepon_HP='" & txtnotelp.Text & "', " & _
                "Agama='" & cmbagama.Text & "', " & _
                "Kewarganegaraan='" & cmbwarga.Text & "', " & _
                "Status_Pernikahan='" & cmbstatus.Text & "', " & _
                "Pekerjaan='" & txtpekerjaan.Text & "', " & _
                "where No_RM='" & txtnorm.Text & "'"
    cmd = New OleDbCommand(aksesedit)
    cmd.Connection = conn
    cmd.ExecuteNonQuery()

syntax error in update was on here
cmd.ExecuteNonQuery()

For "Tanggal_Lahir" i used datetimepicker, cmb=combobox, txt=textbox
Thanks

A:

There should be no comma before the WHERE clause:
 "Pekerjaan='" & txtpekerjaan.Text & "' " & _
                "where No_RM='" & txtnorm.Text & "'"

