A
AkAlan via AccessMonster.com
I have a form with 3 continuous subforms that each have textboxes. Sometimes
they have more data than can be shown without making the textbox relly large.
I want to have the user doubleclick the text box to open another form with a
really large textbox and dynamically supply the recordsource and criteria. I
will post the event code that I am trying to make work. All I get is a blank
form. Any help would be great.
Dim stDocName As String
Dim stLinkCriteria As String
If Me.Dirty Then DoCmd.RunCommand acCmdSaveRecord
Form_frmCarTextPopUp.RecordSource = "q_QcCarDiscrepancy"
Form_frmCarTextPopUp.txtExpanded.ControlSource = "Discrepancy"
stDocName = "frmCarTextPopUp"
stLinkCriteria = "[CarInspNum]=" & "'" & Me![txtCarNum] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria, acFormReadOnly
they have more data than can be shown without making the textbox relly large.
I want to have the user doubleclick the text box to open another form with a
really large textbox and dynamically supply the recordsource and criteria. I
will post the event code that I am trying to make work. All I get is a blank
form. Any help would be great.
Dim stDocName As String
Dim stLinkCriteria As String
If Me.Dirty Then DoCmd.RunCommand acCmdSaveRecord
Form_frmCarTextPopUp.RecordSource = "q_QcCarDiscrepancy"
Form_frmCarTextPopUp.txtExpanded.ControlSource = "Discrepancy"
stDocName = "frmCarTextPopUp"
stLinkCriteria = "[CarInspNum]=" & "'" & Me![txtCarNum] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria, acFormReadOnly