Report.Circle-Methode (Access)

Die Circle-Methode zeichnet einen Kreis, eine Ellipse oder einen Bogen auf einem Report-Objekt , wenn das Print-Ereignis auftritt.

Syntax

Ausdruck verwendet werden. Kreis (Schritt (x, y), Radius, Farbe, Start, Ende, Ausrichtung)

Ausdruck Eine Variable, die ein Report-Objekt darstellt.

Parameter

Name Datentyp Beschreibung
Schritt Schlüsselwort Gibt an, dass der Mittelpunkt des Kreises, der Ellipse oder des Bogens relativ zu den aktuellen Koordinaten ist, die durch die aktuellen Einstellungen für die Eigenschaften CurrentX und CurrentY des Arguments Objekt angegeben werden.
(x, y) Single Gibt die Koordinaten des Mittelpunkts des Kreises, der Ellipse oder des Bogens an. Die Skalierungseigenschaften (ScaleMode, ScaleLeft, ScaleTop, ScaleHeight und ScaleWidth) des Berichtsobjekts, das mit dem Argument Objekt Object angegeben wird, bestimmen die verwendete Maßeinheit.
RADIUS Single Gibt den Radius des Kreises, der Ellipse oder des Bogens an. Die Skalierungseigenschaften (ScaleMode, ScaleLeft, ScaleTop, ScaleHeight und ScaleWidth) des Berichtsobjekts, das mit dem Argument Objekt Object angegeben wird, bestimmen die verwendete Maßeinheit. Standardmäßig werden Entfernungen in Twips gemessen.
Color Long Gibt die RGB-Farbe (Rot-Grün-Blau) der Kreiskontur an. Wird dieses Argument nicht angegeben, so wird der Wert der ForeColor -Eigenschaft verwendet. Sie können für die Farbangabe auch die RGB -Funktion oder die QBColor -Funktion verwenden.
Start Single Wenn ein Teilkreis oder eine Ellipse gezeichnet wird, gibt das Startargument (im Bogenmaß) die Anfangsposition des Bogens an. Der Standardwert für das Startargument ist 0 Bogenmaß. Der Bereich liegt zwischen -2 und 2 Pi Bogenmaß.
End Single Wenn ein Teilkreis oder eine Ellipse gezeichnet wird, gibt das End-Argument (in Bogenmaß) die Endposition des Bogens an. Der Standardwert für das End-Argument ist 2 Pi Bogenmaß. Der Bereich liegt zwischen -2 und 2 Pi Bogenmaß.
Aspekt Single Gibt das Seitenverhältnis des Kreises an. Der Standardwert ist 1,0, was auf jedem Bildschirm einen perfekten (nicht elliptischen) Kreis ergibt.

Hinweise

Verwenden Sie diese Methode nur in einer Ereignisprozedur oder einem Makro, die in den Ereigniseigenschaften für einen Berichtsabschnitt oder in der OnPage-Ereigniseigenschaft für einen Bericht angegeben wird.

Wenn beim Zeichnen eines Teilkreises oder einer Ellipse das Startargument negativ ist, zeichnet die Kreismethode einen Radius auf die durch das Startargument angegebene Position und behandelt den Winkel als positiv. Wenn das End-Argument negativ ist, zeichnet die Circle-Methode einen Radius auf die durch das End-Argument angegebene Position und behandelt den Winkel erneut als positiv. Die Circle-Methode zeichnet immer gegen den Uhrzeigersinn.

Legen Sie zum Ausfüllen eines Kreises die FillColor - und FillStyle-Eigenschaften des Berichts fest. Es kann nur eine geschlossene Figur gefüllt werden. Geschlossene Figuren umfassen Kreise, Auslassungspunkte und Kreisstücke, bei denen es sich um Bögen mit Radiuslinien an beiden Enden handelt.

Wenn Sie beim Zeichnen von Kreissegmenten einen Radius bis zum Winkel 0 zeichnen müssen, um ein horizontales Liniensegment nach rechts zu bilden, geben Sie anstelle von 0 einen sehr kleinen negativen Wert für das Startargument an. Sie können z. B. -.00000001 für das Startargument angeben.

Sie brauchen nicht alle in der Syntax aufgeführten Argumente anzugeben, müssen aber für jedes weggelassene Argument das zugehörige Komma vor dem nächsten Argument einfügen. Wenn Sie ein nachgestelltes Argument auslassen, verwenden Sie keine Kommas, die auf das letzte angegebene Argument folgen.

Die Breite der Linie, die zum Zeichnen des Kreises, der Ellipse oder des Bogens verwendet wird, hängt von der Einstellung der DrawWidth-Eigenschaft ab . Wie der Kreis auf dem Hintergrund gezeichnet wird, hängt von den Einstellungen der Eigenschaften DrawMode und DrawStyle ab.

Wenn Sie die Circle-Methode anwenden, werden die Eigenschaften CurrentX und CurrentY auf die Mittelpunktskoordinaten eingestellt, die durch die Argumente x und y bestimmt sind.

Beispiel

Das folgende Beispiel verwendet die Circle-Methode, um einen Kreis zu zeichnen, anschließend im Kreis einen Kreissektor zu erstellen und diesen rot zu färben.

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, sngVCtr As Single 
    Dim sngRadius As Single 
    Dim sngStart As Single, sngEnd As Single 
 
    sngHCtr = Me.ScaleWidth / 2     ' Horizontal center. 
    sngVCtr = Me.ScaleHeight / 2     ' Vertical center. 
    sngRadius = Me.ScaleHeight / 3     ' Circle radius. 
    ' Draw circle. 
    Me.Circle(sngHCtr, sngVCtr), sngRadius 
    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 
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.

  • Last updated on