FAIRE DES PETITS DESSINS AVEC VISUAL BASIC

Signaler
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
-
Messages postés
146
Date d'inscription
vendredi 1 novembre 2002
Statut
Membre
Dernière intervention
13 décembre 2014
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/52108-faire-des-petits-dessins-avec-visual-basic

Messages postés
146
Date d'inscription
vendredi 1 novembre 2002
Statut
Membre
Dernière intervention
13 décembre 2014

Bonjour,

Que de code pour un résultat médiocre!
Créer des fonctions de dessin dans un module non dans la feuille.
Comme dit Renfield, chaque variable doit etre déclarée explicitement.

Dim Ax1, Ay1, Bx1, By1, Cx1, Cy1 As Single
devient
! = as single
& = as long
% =as integer
# = as double

Dim Ax1!, Ay1!, Bx1!, By1!, Cx1!, Cy1!
Bon courage.
@+
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
69
Dim Ax1, Ay1, Bx1, By1, Cx1, Cy1 As Single

dans ce genre de codes, seul CY1 est un Single
les autres seront des Variant