VB6. I have a form with an ADO control. I want to have the user click on a button to update a value rather than having them do it in the TextBox bound to the field. (Reason: I want to 3 other fields when this field changes.)

Example: User clicks on button and an iNput box comes up. User enters the number 15 and hits OK. I take that value and do the following:

With B.adodc1.Recordset
.Fields("Extension") = sInput '15
.Fields("Notes") = "USERID changed Fields")
.Fields("Late") = True
.Update
End With

With the above example the recordset is updated. However, the form still shows the old values prior to the update. If the user moves to the next record and then back, it is updated.

I have found the following ways to correct:

#1.
.MoveNext
.MovePrevious
I don't like this because I then run into .EOF and .BOF issues that I have to compensate for.

#2.
.Save
I don't like this because I then have to do a .Find in order to return to the record.

Isn't there some way to do an .Update and refresh the screen without #1 or #2 above.

Thanks