Método Report.Print (Access)

O método Print imprime texto em um objeto Report usando a cor e a fonte atuais.

Sintaxe

expressão. Imprimir (Expr)

Expressão Uma variável que representa um objeto Report .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Expr	Obrigatório	String	As expressões de cadeia de caracteres para imprimir. Se esse argumento for omitido, o método Print imprime uma linha em branco. Várias expressões podem ser separadas com um espaço, um ponto e vírgula (;) ou uma vírgula. Um espaço tem o mesmo efeito que um ponto-e-vírgula.

Valor de retorno

Nada

Comentários

Use esse método apenas em um procedimento de evento ou macro especificado pela configuração da propriedade de evento OnPrint de uma seção.

As expressões especificadas pelo argumento Expr são impressas no objeto começando na posição indicada pelas configurações da propriedade CurrentX e CurrentY .

Quando o argumento Expr é impresso, um retorno de carro é geralmente acrescentado, de modo que o próximo método Print comece a imprimir na próxima linha. Quando um retorno de carro ocorre, a configuração da propriedade CurrentY é aumentada pela altura do argumento Expr (o mesmo que o valor retornado pelo método TextHeight ) e a propriedade CurrentX é definida como 0.

Quando um ponto e vírgula segue o argumento Expr , nenhum retorno de transporte é acrescentado e o próximo método Print é impresso na mesma linha em que o método Print atual foi impresso. As propriedades CurrentX e CurrentY são definidas para o ponto imediatamente após o último caractere impresso. Se o próprio argumento Expr contém retornos de carro, cada um desses retornos incorporados define as propriedades CurrentX e CurrentY conforme descrito para o método Print sem um ponto e vírgula.

Quando uma vírgula segue o argumento Expr , as propriedades CurrentX e CurrentY são definidas como a próxima zona de impressão na mesma linha.

Quando o argumento Expr é impresso em um objeto Report, as linhas que não couberem na posição especificada não serão roladas. O texto é recortado para caber no objeto.

Como geral, o método Print imprime com caracteres espaçados proporcionalmente, é importante lembrar-se de que não há nenhuma correlação entre o número de caracteres impressos e o número de colunas de largura fixa esses caracteres ocupam. Por exemplo, uma letra larga (por exemplo, W) ocupa mais de uma coluna de largura fixa, enquanto uma letra estreita (por exemplo, i) ocupa menos. Você deve garantir que suas colunas tabulares estejam posicionadas distantes o suficiente para acomodar o texto que deseja imprimir. Opcionalmente, você pode imprimir com uma fonte de densidade fixa (como Courier) para garantir que cada caractere utilize somente uma coluna.

Exemplo

O exemplo a seguir usa o método Print para exibir texto em um relatório chamado Report1. Ele usa os métodos TextHeight e de TextWidth para centralizar o texto vertical e horizontalmente.

Private Sub Detail_Format(Cancel As Integer, _ 
 FormatCount As Integer) 
 Dim rpt as Report 
 Dim strMessage As String 
 Dim intHorSize As Integer, intVerSize As Integer 
 
 Set rpt = Me 
 strMessage = "DisplayMessage" 
 With rpt 
 'Set scale to pixels, and set FontName and 
 'FontSize properties. 
 .ScaleMode = 3 
 .FontName = "Courier" 
 .FontSize = 24 
 End With 
 ' Horizontal width. 
 intHorSize = Rpt.TextWidth(strMessage) 
 ' Vertical height. 
 intVerSize = Rpt.TextHeight(strMessage) 
 ' Calculate location of text to be displayed. 
 Rpt.CurrentX = (Rpt.ScaleWidth/2) - (intHorSize/2) 
 Rpt.CurrentY = (Rpt.ScaleHeight/2) - (intVerSize/2) 
 ' Print text on Report object. 
 Rpt.Print strMessage 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.