Hi Sergey,

>For a commandbutton you can try MDOWN() in the Click.

Thanks for idea. Unfortunately, the mdown() state appears to have cleared by the time the Click() event activates.

Here's what I put in my Click() event to verify this:

if mdown()
Thisform.lblMessage.Caption = 'Mouseclick'
else
Thisform.lblMessage.Caption = 'Keyboard'
endif

Any other ideas?

Malcolm