I am looking for a way to delete the value from either a textbox or
combo box by a button on a form and the action to delete applies to
the textbox or combo that is focused with the mouse.
The delete action is followed by a record refresh, implicating
dependent fields become empty or unable (already works)

Bart

The problem here is that when the user clicks the button on your form, the
field loses focus (i.e. focus moves to the command button when you click
it.)

You may be able to use:
Screen.PreviousControl = Null
but several things could go wrong here, e.g.:
- there might not be a previous control,
- the previous control may not hold data (e.g. another command button)
- the previous control may be bound to a required field (so cannot be set to
Null.)

--
Allen Browne - Microsoft MVP. Perth, Western Australia
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"AA Arens" <bartvandongen (AT) gmail (DOT) com> wrote

On Aug 1, 5:08*pm, "Allen Browne" <AllenBro... (AT) SeeSig (DOT) Invalid> wrote:
Allen,

Based on your input, it's better to have a button beside the field it
refers to, so for every field an "erase value" button.

What would be the code, I remember such as erase function but I can't
find a good sample.

Bart

The button for City would be:
Me.City = Null

But you still have the problem where the field might be required.

How about teaching the users to press the Esc key once to undo the current
field, or twice to undo the record?

--
Allen Browne - Microsoft MVP. Perth, Western Australia
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.
"AA Arens" <bartvandongen (AT) gmail (DOT) com> wrote

On Aug 1, 5:08 pm, "Allen Browne" <AllenBro... (AT) SeeSig (DOT) Invalid> wrote:
Allen,

Based on your input, it's better to have a button beside the field it
refers to, so for every field an "erase value" button.

What would be the code, I remember such as erase function but I can't
find a good sample.

Bart

AA Arens wrote:
Could you do this?

Option Compare Database
Option Explicit
Dim strField As String
Private Function GetName()
strField = Me.ActiveControl.Name
MsgBox strField 'for debugging purposes only
End Function

Then your command buttons code could be
Me(strField) = Null

In design view of the form, hightlight all the fields you want to clear
and enter the property sheet. In the OnGotFocus event enter
=GetName()

Caveat. If you had GetName() in address but not in city, and were
sitting in city and then pressed the button, address would be wiped out.