Visual Basic 6.0 : SQL Update

Sample Codes Here:

Private Sub cmdU_Click()

Dim a As String

a = MsgBox("Are you sure you want to Update?", vbQuestion + vbYesNo, "Message")

If a = vbYes Then

con.Execute "Update tblsampledb set MiddleName= '" & txtMN.Text & "',LastName='" & txtLN.Text & "'where FirstName='" & txtFN.Text & " '"

MsgBox "Succesfully Update!", vbInformation, "Message"

txtMN.Text = ""

txtLN.Text = ""

Exit Sub

End If

End Sub

Watch video below