create an onclick event for a button created by vba

[mdpepper1]

I've created a form using vba and I have used the createControl function to add a button to the form.

I want to include code in the button creation which specifies what I would like to happen when the button is pressed (run an sql insert )

How can I achieve this?

button code:

 
     Set ctlNew = CreateControl(frm.Name, acCommandButton, , , "newButton", 500, 500)
    ' Set control's caption.
    ctlNew.Caption = "New Command Button"
    
    With ctlNew
    .Name = "niceNewButton"


    End With

[June7]

Why are you using VBA to create objects and controls? Why not use the designers?

Just use the designer to drag a button control to the form. Then in the Click event property for the button, select [Event Procedure], double click the ellipses (...), to go to the procedure in the VBA editor. Type code.

Why do you need an sql INSERT? Is the form bound to data and data entry controls bound to fields of the form's RecordSource? If so, just type data into the controls, entries go direct to table. Close form and record is committed.