Faire un cercle point par point (assez rapide !)

Contenu du snippet

Ba comme dit le titre faire un cercle pont par point (le code ci-dessous) pas besoin de zip ;-)

Source / Exemple :


r=atn(1)*4/180 'degres
ecartp=1
For i = 0 To taille Step ecartP
xx = Cos(i / r) * 1000 / 2 'pour définir
yy = Sin(i / r) * 1000 / 2 'le point dorigine du cercle
PSet (X + xx, Y + yy), Picture1.Point(X + xx, Y + yy) 'point du cercle
Next

Conclusion :


laissez vos commentaires (comme dab) et voila de bonne notes plz !

A voir également

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.