Report. Eigenschaften CurrentX-Eigenschaft (Access)Report.CurrentX property (Access)

Mithilfe der CurrentX-Eigenschaft (und der CurrentY-Eigenschaft) können die horizontalen und vertikalen Koordinaten für die Stelle angegeben werden, an der die nächste Druck- und Zeichenmethode in einem Bericht beginnt.You can use the CurrentX property (along with the CurrentY property) to specify the horizontal and vertical coordinates for the starting position of the next printing and drawing method on a report. Wert vom Typ Single mit Lese-/Schreibzugriff.Read/write Single.

SyntaxSyntax

Ausdruck. Eigenschaften CurrentXexpression.CurrentX

Ausdruck Eine Variable, die ein Report -Objekt darstellt.expression A variable that represents a Report object.

HinweiseRemarks

Sie können mit diesen Eigenschaften z. B. feststellen, wo sich der Kreismittelpunkt in einem Berichtsbereich befindet.For example, you can use these properties to determine where the center point of a circle is drawn on a report section.

Die Koordinaten werden von der oberen linken Ecke des Berichtsabschnitts gemessen, der den Verweis auf die Eigenschaften CurrentX -oder CurrentY -Eigenschaft enthält.The coordinates are measured from the upper-left corner of the report section that contains the reference to the CurrentX or CurrentY property. Die Einstellung der Eigenschaften CurrentX -Eigenschaft ist 0 am linken Rand des Abschnitts, und die Einstellung der CurrentY -Eigenschaft ist am oberen Rand 0.The CurrentX property setting is 0 at the section's left edge, and the CurrentY property setting is 0 at its top edge.

Sie können die Eigenschaften CurrentX -und CurrentY -Eigenschaften in einer Ereignisprozedur festlegen, die von der Einstellung der OnPrint-Eigenschaft eines Berichtsabschnitts angegeben wird. You can set the CurrentX and CurrentY properties in an event procedure specified by the OnPrint property setting of a report section.

Verwenden Sie die ScaleMode -Eigenschaft, um die Maßeinheit (beispielsweise Punkte, Pixel, Zeichen, Zoll, Millimeter oder Zentimeter) zu definieren, auf der die Koordinaten basieren sollen.Use the ScaleMode property to define the unit of measure, such as points, pixels, characters, inches, millimeters, or centimeters, that the coordinates will be based on.

Wenn Sie die folgenden Grafikmethoden verwenden, werden die Einstellungen für CurrentX und CurrentY folgendermaßen geändert:When you use the following graphics methods, the CurrentX and CurrentY property settings are changed as indicated.

MethodeMethod Wert für CurrentX und CurrentYSets CurrentX, CurrentY properties to
CircleCircle Mittelpunkt des Objekts.The center of the object.
LinieLine Endpunkt der Linie (die Koordinaten x2 und y2).The end point of the line (the x2, y2 coordinates).
PrintPrint Nächste Druckposition.The next print position.

BeispielExample

Im folgenden Beispiel wird die Print -Methode verwendet, um Text in einem Bericht mit dem Namen Report1anzuzeigen.The following example uses the Print method to display text on a report named Report1. Mit den Methoden TextWidth und TextHeight wird der Text vertikal und horizontal zentriert.It uses the TextWidth and TextHeight methods to center the text vertically and horizontally.

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

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.