call another forms event

P

phillip9

Hello everyone,

My parent form opens another form and pre-fills some text boxes, that part
works great. I then want to call a text-box_afterUpdate() event.

example:
frmMain
cntButtonNewCorrespondence_onClick()
'opens a child form to allow data entry
docmd.openform "frmNewCorrespondence"
' code pre-fills a lot of text fields
forms!frmNewCorrespondence.controls.txtID = "best user"
' want to run the txtID_afterUpdate() event
< want to run frmNewCorrespondence.controls.txtID_afterUpdate() >
end sub


frmNewCorrespondence.txtID_afterUpdate()
....
'lots of processing code
end sub
 
F

fredg

Hello everyone,

My parent form opens another form and pre-fills some text boxes, that part
works great. I then want to call a text-box_afterUpdate() event.

example:
frmMain
cntButtonNewCorrespondence_onClick()
'opens a child form to allow data entry
docmd.openform "frmNewCorrespondence"
' code pre-fills a lot of text fields
forms!frmNewCorrespondence.controls.txtID = "best user"
' want to run the txtID_afterUpdate() event
< want to run frmNewCorrespondence.controls.txtID_afterUpdate() >
end sub

frmNewCorrespondence.txtID_afterUpdate()
....
'lots of processing code
end sub What is this?
forms!frmNewCorrespondence.controls.txtID = "best user"<
Click to expand...
Are you truing to give the txtID control a value of "best user"?

Try:

Private Sub cntButtonNewCorrespondence_onClick()
docmd.openform "frmNewCorrespondence"
forms!frmNewCorrespondence!txtID = "best user"
Call Forms("frmNewCorrespondence").txtID_AfterUpdate
End Sub

NOTE: You must also change the txtID_AfterUpdate sub procedure from
Private Sub txtID_AfterUpdate()
to
Public Sub txtID_AfterUpdate()
 
P

phillip9

Hello fredg,

thank you very much. That was perfect and works great.


Thank you,
Phil H
 
Top