Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Verwenden Sie die ScaleLeft-Eigenschaft, um die Einheiten für die horizontalen Koordinaten anzugeben, welche die Position des linken Randes einer Seite beschreiben, wenn die Circle-, Line-, Pset- oder Print-Methode verwendet wird, während ein Bericht gedruckt oder in der Vorschau angezeigt wird oder seine Ausgabe in einer Datei gespeichert wird. Wert vom Typ Single mit Lese-/Schreibzugriff.
Syntax
Ausdruck verwendet werden. ScaleLeft
Ausdruck Eine Variable, die ein Report-Objekt darstellt.
Hinweise
Sie können die ScaleLeft-Eigenschaft mithilfe eines Makros oder einer Visual Basic-Ereignisprozedur festlegen, die durch die OnPrint-Eigenschafteinstellung eines Abschnitts angegeben wird.
Wenn Sie diese Eigenschaften und die verwandten ScaleHeight- und ScaleWidth-Eigenschaften verwenden, können Sie ein vollständiges Koordinatensystem mit positiven und negativen Koordinaten einrichten. Alle vier Skalierungseigenschaften interagieren auf folgende Weise mit der ScaleMode-Eigenschaft :
Wenn Sie eine andere Scale-Eigenschaft auf einen beliebigen Wert festlegen, wird die ScaleMode-Eigenschaft automatisch auf 0 festgelegt.
Wenn Sie die ScaleMode-Eigenschaft auf eine Zahl größer als 0 festlegen, werden die Einstellungen der ScaleHeight - und ScaleWidth-Eigenschaft in die neue Maßeinheit geändert, und die ScaleLeft - und ScaleTop-Eigenschaften werden auf 0 festgelegt. Außerdem werden die Einstellungen der Eigenschaften CurrentX und CurrentY geändert, um die neuen Koordinaten des aktuellen Punkts widerzuspiegeln.
Sie können auch die Scale-Methode verwenden, um die Eigenschaften ScaleHeight, ScaleWidth, ScaleLeft und ScaleTop in einer Anweisung festzulegen.
Hinweis
Die ScaleLeft-Eigenschaft ist nicht mit der Left-Eigenschaft identisch.
Beispiel
Das folgende Beispiel verwendet die CircleCircle-Methode, um einen Kreis zu zeichnen und im Kreis einen Kreissektor zu erstellen. Anschließend werden die Eigenschaften FillColor und FillStyle verwendet, um das Kreissegment rot einzufärben. Außerdem wird eine Linie von oben links zur Mitte des Kreises gezogen.
Zum Testen dieses Beispiels in Microsoft Access erstellen Sie einen neuen Bericht. Legen Sie die OnPrintOnPrint-Eigenschaft des Detailbereichs auf [Ereignisprozedur] fest. Geben Sie den folgenden Code in das Berichtsmodul ein, und wechseln Sie dann in die Seitenansicht.
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Const conPI = 3.14159265359
Dim sngHCtr As Single
Dim sngVCtr As Single
Dim sngRadius As Single
Dim sngStart As Single
Dim sngEnd As Single
sngHCtr = Me.ScaleWidth / 2 ' Horizontal center.
sngVCtr = Me.ScaleHeight / 2 ' Vertical center.
sngRadius = Me.ScaleHeight / 3 ' Circle radius.
Me.Circle (sngHCtr, sngVCtr), sngRadius ' Draw circle.
sngStart = -0.00000001 ' Start of pie slice.
sngEnd = -2 * conPI / 3 ' End of pie slice.
Me.FillColor = RGB(255, 0, 0) ' Color pie slice red.
Me.FillStyle = 0 ' Fill pie slice.
' Draw Pie slice within circle
Me.Circle (sngHCtr, sngVCtr), sngRadius, , sngStart, sngEnd
' Draw line to center of circle.
Dim intColor As Integer
Dim sngTop As Single, sngLeft As Single
Dim sngWidth As Single, sngHeight As Single
Me.ScaleMode = 3 ' Set scale to pixels.
sngTop = Me.ScaleTop ' Top inside edge.
sngLeft = Me.ScaleLeft ' Left inside edge.
sngWidth = Me.ScaleWidth / 2 ' Width inside edge.
sngHeight = Me.ScaleHeight / 2 ' Height inside edge.
intColor = RGB(255, 0, 0) ' Make color red.
' Draw line.
Me.Line (sngTop, sngLeft)-(sngWidth, sngHeight), intColor
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.