Report.Circle-Methode (Access)

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

Syntax

Ausdruck. Kreis (Schritt (x, y), Radius, Farbe, Start, Ende, Aspekt)

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 von den aktuellen Einstellungen für die Eigenschaften CurrentX und CurrentY des Arguments Object angegeben werden.
(x, y)	Single	Gibt die Koordinaten des Mittelpunkts des Kreises, der Ellipse oder des Bogens an. Die Scale-Eigenschaften (ScaleMode, ScaleLeft, ScaleTop, ScaleHeight und ScaleWidth) des vom Argument Object angegebenen Report-Objekts bestimmen die verwendete Maßeinheit.
RADIUS	Single	Gibt den Radius des Kreises, der Ellipse oder des Bogens an. Die Scale-Eigenschaften (ScaleMode, ScaleLeft, ScaleTop, ScaleHeight und ScaleWidth) des vom Argument Object angegebenen Report-Objekts bestimmen die verwendete Maßeinheit. Standardmäßig werden Entfernungen in Twips gemessen.
Color	Long	Gibt die RGB-Farbe (Rot-Grün-Blau) des Kreisumrisses 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 Start-Argument (im Bogenmaß) die Anfangsposition des Bogens an. Der Standardwert für das Argument Start ist 0 Bogenmaß. Der Bereich ist -2 Pi-Bogenmaß bis 2 Pi-Bogenmaß.
End	Single	Wenn ein Teilkreis oder eine Ellipse gezeichnet wird, gibt das End-Argument (im Bogenmaß) die Endposition des Bogens an. Der Standardwert für das End-Argument ist 2 pi-Bogenmaß. Der Bereich ist -2 Pi-Bogenmaß bis 2 Pi-Bogenmaß.
Aspekt	Single	Gibt das Seitenverhältnis des Kreises an. Der Standardwert ist 1,0, was einen perfekten (nicht elliptischen) Kreis auf jedem Bildschirm ergibt.

HinwBemerkungeneise

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

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

Um einen Kreis zu füllen, legen Sie die Eigenschaften FillColor und FillStyle des Berichts fest. Es kann nur eine geschlossene Figur ausgefüllt werden. Geschlossene Figuren umfassen Kreise, Ellipsen und Kreissegmente, bei denen es sich um Bögen mit Radiuslinien handelt, die an beiden Enden gezeichnet werden.

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 einen sehr kleinen negativen Wert für das Argument Start anstelle von 0 an. Sie können z. B. -.00000001 für das Start-Argument 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 nachfolgendes Argument weglassen, verwenden Sie keine Kommas nach dem letzten Argument, das Sie angeben.

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. Die Art und Weise, wie der Kreis im 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 Modul des Berichts ein, und wechseln Sie dann zur 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.