Name of control by double clicking control

[Cosmos75]

Is there a way to show name of a control by double-clicking it? Say I have a textbox names txt1, instead of have to do this for each control I have in a form

Private Sub txt1_DblClick(Cancel As Integer)

MsgBox  "txt1"

End Sub

Is there some other command to do this?

 

[GumbyD]

You can create a general function to call on double click:

Public Function ShowName()

MsgBox Me.Name, vbOKOnly

End Function

In the On Dbl Click property put ShowName()

GumbyD

 

[Cosmos75]

Found it!

'Name of control
Me.ActiveControl.Name

So I can use

MsgBox Me.ActiveControl.Name