Pour colorier un arc de cercle, vous devez
le signes des angles de départ et de fin doivent être négatifs
Source / Exemple :
Private Sub Form_Paint()
FillStyle = 0
FillColor = vbRed
Circle (ScaleWidth / 2, ScaleHeight / 2), 1400, RGB(Rnd * 255, Rnd * 255, Rnd * 255),
-3.14 / 4, -3.14 / 2
End Sub
Conclusion :
-Définit le style de remplissage
-Puis la couleur de remplissage
-Trace le cercle :
coordonnée X=ScaleWidth/2
coordonnéées Y= ScaleHeight/2
rayon = 1400
couleur alétoire
angle de début
angle de fin
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.