Você está offline; aguardando reconexão

ACC2000: Como imprimir um único registo a partir de um formulário num relatório

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática… erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 209560
Este artigo foi arquivado. Este artigo é oferecido "tal como está" e deixará de ser actualizado.
Moderado: Requer básica macros, codificação e interoperabilidade competências.

Este artigo aplica-se a uma base de dados do Microsoft Access (.mdb) e a um projecto do Microsoft Access (.adp).

Sumário
Este artigo mostra como para seleccionar um único registo num formulário e imprimi-lo num relatório.
Mais Informação
O seguinte procedimento imprime apenas o registo que seleccionou do formulário clientes na base de dados exemplo Adamastor.mdb.

  1. Criar um relatório baseado na tabela clientes e atribua o nome rptPrintRecord.
  2. Abra o formulário clientes na vista de estrutura. Adicione um botão de comando ao formulário e defina as propriedades de botão de comando seguintes:
       Name: cmdPrintRecord   Caption: Print Record   OnClick: [Event Procedure]					
  3. Defina a propriedade AoFazerClique como o seguinte procedimento de evento:
     Private Sub cmdPrintRecord_Click()   Dim strReportName As String   Dim strCriteria As String       strReportName = "rptPrintRecord"   strCriteria = "[CustomerID]='" & Me![CustomerID] & "'"   DoCmd.OpenReport strReportName, acViewPreview, , strCriteria    End Sub					
  4. Abra o formulário na vista de formulário e, em seguida, clique em Imprimir registo . Note que a pré-visualização de relatório é limitado ao registo actual do formulário clientes.
um

Aviso: Este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 209560 - Última Revisão: 12/05/2015 11:09:11 - Revisão: 2.0

Microsoft Access 2000 Standard Edition

  • kbnosurvey kbarchive kbmt kbhowto kbinfo KB209560 KbMtpt
Comentários