create button and add an event

[matrixindicator]

I create my buttons and forms with vba. I wonder if you can even add an event and some code on it ?

OwnControl.Caption = rst!plantnl 
OwnControl.ForeColor = white = not working.
OwnControl.Name = rst!IDPL

 

[KiaruB]

sure u can :

OwnControl.OnClick = "= ... your command here ...

 

[matrixindicator]

Yeah I found this also but strugling with the code.

It seems he accept a macro. In this macro I refer to a procedure testfunct (ctl1.name)
In a textbox he should show onclick for each button the number of te bottum (is also an article ID).
But how to say take the name of the this control (button)
If I click on button1 he shows this in the textbox.
The name of the control is in this case 1.
Now I am obliged to say ctl1.name. Could I not say the button where you are on (and not ctl1, ctl2, ctt3,...

Function testfunct(ctl1 As String) = ctl1 is working not ctl
Forms![14]!txtIDART = ctl

End Function