Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
La méthode Circle dessine un cercle, une ellipse ou un arc sur un objet Rapport lorsque l’événement d’impression se produit.
Syntaxe
expression. Cercle (Pas (x, y), Rayon, Couleur, Début, Fin, Aspect)
expression Variable qui représente un objet Rapport .
Paramètres
| Nom | Type de données | Description |
|---|---|---|
| Étape | Mot clé | Indique que le centre du cercle, de l’ellipse ou de l’arc est relatif aux coordonnées actuelles données par les paramètres actuels pour les propriétés CurrentX et CurrentY de l’argument Objet . |
| (x, y) | Single | Indique les coordonnées du point central du cercle, de l’ellipse ou de l’arc. Les propriétés Scale (ScaleMode, ScaleLeft, ScaleTop, ScaleHeight et ScaleWidth) de l’objet Report spécifié par l’argument Object déterminent l’unité de mesure utilisée. |
| Radius | Single | Indique le rayon du cercle, de l’ellipse ou de l’arc. Les propriétés Scale (ScaleMode, ScaleLeft, ScaleTop, ScaleHeight et ScaleWidth) de l’objet Report spécifié par l’argument Object déterminent l’unité de mesure utilisée. Par défaut, les distances sont mesurées en twips. |
| Color | Long | Indique la couleur RVB (rouge-vert-bleu) du contour du cercle. Si cet argument est omis, la valeur de la propriété ForeColor est utilisée. Vous pouvez également utiliser la fonction RGB ou QBColor pour spécifier la couleur. |
| Start | Single | Lorsqu’un cercle partiel ou une ellipse est dessiné, l’argument Start spécifie (en radians) la position initiale de l’arc. La valeur par défaut de l’argument Start est 0 radians. La plage est comprise entre -2 pi radians et 2 pi radians. |
| End | Single | Lorsqu’un cercle partiel ou une ellipse est dessiné, l’argument Fin spécifie (en radians) la position finale de l’arc. La valeur par défaut de l’argument End est de 2 pi radians. La plage est comprise entre -2 pi radians et 2 pi radians. |
| Aspect | Single | Indique les proportions du cercle. La valeur par défaut 1,0 produit un cercle parfait (non elliptique) sur n'importe quel écran. |
Remarques
Utilisez cette méthode uniquement dans une procédure événementielle ou une macro spécifiée par les propriétés d’événement d’une section d’état ou la propriété d’événement OnPage pour un état.
Lorsque vous dessinez un cercle partiel ou une ellipse, si l’argument de départ est négatif, la méthode Circle dessine un rayon à la position spécifiée par l’argument de départ et traite l’angle comme positif. Si l’argument Fin est négatif, la méthode Cercle dessine un rayon à la position spécifiée par l’argument Fin et traite à nouveau l’angle comme positif. Avec la méthode Circle, les dessins sont toujours exécutés dans le sens inverse des aiguilles d'une montre (sens positif).
Pour remplir un cercle, définissez les propriétés FillColor et FillStyle de l'état. Seule une figure fermée peut être remplie. Les cercles, les ellipses et les secteurs (arcs avec des rayons dessinés aux deux extrémités) sont des figures fermées.
Lorsque vous dessinez des secteurs, si vous devez dessiner un rayon à l’angle 0 pour former un segment de ligne horizontal à droite, spécifiez une très petite valeur négative pour l’argument de départ plutôt que 0. Par exemple, vous pouvez spécifier -.00000001 pour l’argument Start .
Vous pouvez omettre un argument au milieu de la syntaxe, mais vous devez inclure sa virgule avant l'argument suivant. Si vous omettez un argument de fin, n’utilisez pas de virgules après le dernier argument que vous spécifiez.
La largeur de la ligne utilisée pour dessiner le cercle, l’ellipse ou l’arc dépend du paramètre de la propriété DrawWidth . La façon dont le cercle est dessiné sur l’arrière-plan dépend des paramètres des propriétés DrawMode et DrawStyle .
Lorsque vous appliquez la méthode Circle, les propriétés CurrentX et CurrentY sont définies en fonction du point central spécifié par les arguments x et y.
Exemple
Dans l'exemple suivant, la méthode Circle est utilisée pour dessiner un cercle. Un secteur est alors créé dans ce cercle et colorié en rouge.
Pour appliquer cet exemple dans Microsoft Access, créez un nouvel état. Définissez la propriété OnPrint de la section Détail sur [Event Procedure]. Entrez le code suivant dans le module de l’état, puis passez en Aperçu avant impression.
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
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.