[احمد خطاب]

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        Dim cmd As New OleDbCommand
        cmd = New OleDbCommand("update table1 set where info = user_idinfo ='" & TextBox1.Text & "'user_fornameinfo ='" & TextBox2.Text & "'user_ genderinfo = '" & TextBox2.Text & "')", con)
        con.Open()
        cmd.ExecuteNonQuery()
        con.Close()
    End Sub