Método Report.Print (Access)

El método Imprimir imprime texto en un objeto Informe utilizando el color y la fuente actuales.

Sintaxis

más sencilla.Imprimir (Expr)

expresión Variable que representa un objeto Report .

Parameters

Valor devuelto

Nothing

Comentarios

Use este método solo en una macro o un procedimiento de evento especificado 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 comenzando en 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 con la altura del argumento Expr (el mismo valor que devuelve 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 de impresión se imprime en la misma línea en la que se imprime el método de impresión 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 al 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 para dar cabida al 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.