J
JustinP
I am using code to add text boxes to a report and need to access the
data for the current record (this data will dictate how many text boxes
to create). Having opened the report in design view how do I do this?
70 DoCmd.OpenReport "DummyReport", acViewDesign
80 i = 1
90 strSplit = Split(Reports!DummyReport!txtDummyBox.Value, "|")
<<<WHAT GOES HERE?
100 Do Until i = UBound(strSplit)
110 ctlTxtBox = CreateReportControl(DummyReport, acTextBox,
acGroupLevel1Header, "", intTxtBoxLeft, intTxtBoxTop + 600,
intTxtBoxWidth, intTxtBoxHeight)
120 Loop
130 DoCmd.OpenReport "DummyReport", acViewPreview
data for the current record (this data will dictate how many text boxes
to create). Having opened the report in design view how do I do this?
70 DoCmd.OpenReport "DummyReport", acViewDesign
80 i = 1
90 strSplit = Split(Reports!DummyReport!txtDummyBox.Value, "|")
<<<WHAT GOES HERE?
100 Do Until i = UBound(strSplit)
110 ctlTxtBox = CreateReportControl(DummyReport, acTextBox,
acGroupLevel1Header, "", intTxtBoxLeft, intTxtBoxTop + 600,
intTxtBoxWidth, intTxtBoxHeight)
120 Loop
130 DoCmd.OpenReport "DummyReport", acViewPreview