Método Report.Print (Access)

El método Print imprime texto en un objeto Report mediante el color y la fuente actuales.

Sintaxis

expresión. Imprimir (expr)

Expresión Variable que representa un objeto Report .

Parameters

Valor devuelto

Nothing

Comentarios

Use este método solo en un procedimiento de evento o una macro especificados por el valor de la propiedad de evento OnPrint de una sección.

Las expresiones especificadas por el argumento Expr se imprimen en el objeto a partir de la posición indicada por la configuración de las propiedades CurrentX y CurrentY .

Cuando se imprime el argumento Expr, normalmente se agrega un retorno de carro para que el siguiente método Print comience la impresión en la siguiente línea. Cuando se produce un retorno de carro, el valor de la propiedad CurrentY aumenta por el alto del argumento Expr (igual que el valor devuelto por el método TextHeight ) y la propiedad CurrentX se establece en 0.

Cuando un punto y coma sigue al argumento Expr , no se anexa ningún retorno de carro y el siguiente método Print se imprime en la misma línea en la que se imprimió el método Print actual. Las propiedades CurrentX y CurrentY se establecen en el punto inmediatamente después de que el último carácter impreso. Si el argumento Expr contiene retornos de carro, este retorno de carro establece las propiedades CurrentX y CurrentY tal como se describe para el método Print sin un punto y coma.

Cuando una coma sigue el argumento Expr , las propiedades CurrentX y CurrentY se establecen en la siguiente zona de impresión en la misma línea.

Cuando el argumento Expr se imprime en un objeto Report, las líneas que no caben en la posición especificada no se desplazan. El texto se recorta para ajustarse al objeto.

Dado que el método Print normalmente imprime con caracteres de espacio proporcionados, es importante recordar que no hay ninguna correlación entre el número de caracteres impresos y el número de columnas de ancho fijo que ocupan esos caracteres. Por ejemplo, una letra grande (como la W) ocupa más de una columna de ancho fijo, una letra fina (como la i) ocupa menos. Debe asegurarse de que las columnas tabulares están lo suficientemente separadas como para acomodar el texto que desea imprimir. Como alternativa, puede imprimir con una fuente de punto fijo (como Courier) para asegurarse de que cada carácter sólo ocupa una columna.

Ejemplo:

El ejemplo siguiente utiliza el método Print para mostrar texto en un informe denominado Informe1. Utiliza los métodos TextWidth y TextHeight para centrar el texto verticalmente y 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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.