You can pass one or several values to the report when you open it.
In the Form module:
Code:
Private Sub Command_OpenReport_Click()
DoCmd.OpenReport "ReportName", acViewPreview, , , , Me.Text_ToReport.Value
End Sub
Where:
Text_ToReport is the name of the textbox that contains the value you want to send to the report.
ReportName is the name of the report that, when open, receives the transmitted value.
In the Report module:
Code:
Private Sub Report_Open(Cancel As Integer)
Me.Label_FromForm.Caption = Nz(Me.OpenArgs, "")
End Sub
Where:
Label_FromForm is the name of a label that will display the data received from the form.