[Resolvido]Botao Visualizar e Imprimir Relatório no Access

Boa noite Senhores,

Estou esse ano pela primeira vez precisando de vossa ajuda para resolver um probleminha com uma função
num botão imprimir no access...

É o seguinte, estou usando a função abaixo para visualizar e caso queira imprimir o relatório...

O Formulário abre dentro de uma caixa de texto. "Função: unbound control.
Clico num botão que abre os forms dentro da caixa de texto frmMENUS...

Ao visualizar o Form sem ser na caixa de texto e clicar no botão visualizar, imprimir o relatório. O mesmo
abre normamente sem erro. Porém, quando entro no Sistema e abro o o form dentro da caixa de texto, ao clicar
no botão para visualizar e imprimir abre a mensagem: Inserir valor do parâmetro? E mostra Formulários!frmRecibo!CódRecibo

A função que estou usando no botão é essa:

Private Sub bt_imprimir_Click()
On Error Resume Next
PlaySound fLocalBd & "\JefRecibo\Sons\click.wav", 1, 1
'Visualizar
Me.Refresh
Dim strDocName As String
Dim strFilter As String
strDocName = "Recibo04" ' nome do relatório
strFilter = "CódRecibo = forms!frmRecibo!CódRecibo" 'filtro aplicado no relatorio onde idserviço é a chave primária da tabela base...forms é o formulário....OS é o nome de formulário.
DoCmd.OpenReport strDocName, acViewPreview, , strFilter

DoCmd.RunCommand acCmdZoom100
DoCmd.RunCommand acCmdPreviewOnePage

'Em seu botão para imprimir no evento click
If MsgBox("Confirma a impressão?", vbYesNo, "Atenção") = vbYes Then
DoCmd.OpenReport "Recibo04", acViewNormal, , , acHidden

If Err = 2501 Then 'usando
Err.Clear
End If
DoCmd.Close acReport, "Recibo04"
End If
End Sub


Não sei aí onde estou errando... Se alguém poder me ajudar, fico muito grato...

Abraço a todos que fazem parte desse maravilhoso fórum... Deus continue dando sabedoria, conhecimento e abençoando a cada um...

Boa noite,

Deu certo, buscando aqui no forum, consegui uma solução apresentada pelo mestre Avelino..

docmd.OpenReport "NomeDoRelatório",acViewPreview ,,"codcliente = " & me!codCliente

Já foi... Tá tudo certo...

Abraço,

Comcluído.