>>I also got the following to work as well in the toolbar click method:

>>parameter lcObject
>>lcTable = This.TableName         && class properties that store the name of the table
>>lcForm = This.FormName            && and the form name that the toolbar applies to
>>if !used(lcTable) or type("lcObject") <> "C"
>>   return
>>endif
>>if type(lcForm) = "O"
>>   if upper(&lcForm..ActiveControl.BaseClass) $"TEXTBOX,EDITBOX,CHECKBOX,OPTIONGROUP"
>>      &lcForm..ActiveControl.Value = &lcForm..ActiveControl.Value
>>   endif
>>endif
>>

>>Setting the Value of the active control to itself did the trick.
>
>I'd forgotten that method - more elegant than the one I suggested.

FYI:

Because of a problem (error: Member not found ACTIVECONTROL) if the currently selected control on the form is an ActiveX, I had to revise the if statement to read:

if type(lcForm + ".ActiveControl") = "O"