Comprendre ce code

marwakarim Messages postés 40 Date d'inscription samedi 27 mars 2010 Statut Membre Dernière intervention 11 juin 2010 - 11 juin 2010 à 16:28
us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 - 12 juin 2010 à 22:36
Salut je veux comprendre ce code c'est pour le chargement d'une form
If pgr.Width <= taille.Width Then
pgr.Width = pgr.Width + 50
Else
Timer1.Interval = 0

Form3.Show
Unload Me

4 réponses

cs_GG29 Messages postés 326 Date d'inscription vendredi 23 décembre 2005 Statut Membre Dernière intervention 8 février 2011 17
11 juin 2010 à 17:48
Ca va être dur de t'expliquer sans savoir ce que sont pgr et taille.


---
mon blog
Généralement le bug se situe entre le clavier et la chaise.
Le temps est une "chose" introuvable dont l'existence ne fait aucun doute.
0
evilcoder Messages postés 25 Date d'inscription vendredi 28 mai 2010 Statut Membre Dernière intervention 29 décembre 2010
11 juin 2010 à 18:27
salut marwakarim

c'est une abréviation de programme
0
evilcoder Messages postés 25 Date d'inscription vendredi 28 mai 2010 Statut Membre Dernière intervention 29 décembre 2010
11 juin 2010 à 18:28
je crois que c'est le nom de la "form"
0
us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 10
12 juin 2010 à 22:36
Bonjour,

marwakarim, tu as surement couper un peu trop de chose du code... enfin je vais de traduire les lignes :

pgr.width => fait référence à la largeur (en pixel) d'un objet (un objet c'est par exemple une Form)
Taille.width => idem, mais sur l'objet nommé Taille

donc :

If pgr.Width <= taille.Width Then '=> SI la largeur de "prg" est plus petite ou égale à la largeur de "taille" ALORS

pgr.Width = pgr.Width + 50 '=> Ajoute 50 à la largeur de "pgr"

Else '=> SINON

Timer1.Interval = 0 '=> met l'interval du Timer à zéro, donc hors service !

Form3.Show '=> Charge en mémoire la Form3 et l'affiche

Unload Me '=> décharge la Form où ce code est appelé


Il manque un END IF quelque part. De plus, on voit pas très bien ce que fait là le Timer (peut-être pour une amination ?)

Amicalement,
Us.
0
Rejoignez-nous