123456 | |
Auteur | Messages |
---|---|
defcom | #76 Posté le 11/8/2010 à 14:11:00 |
comment éviter les erreurs de tag vide. car quand le label n'a pas de tag la boucle plante. ou la même fonction mais avec une boucle For car je connais le début et la fin de la boucle. Cela évitera de prendre des label d'information. | |
gambix | #77 Posté le 11/8/2010 à 16:23:00 |
Faire simple ! | dim h as object for each h in panel1.children if h is Label and if h.tag then h.Text = montableau[h.tag] endif next pas plus dure ... si tu ne met rien dans le tag il retourne null=false si ça ne marche pas comme ça (je ne peu pas tester la ) fait if h is Label and if not isnull(h.tag) then et je ne veut pas être méchant mais il faut chercher un peu avant de demander !... exclure un cas revient a mettre une condition ! ennonce la boucle ... pour tout les objet dans le panel; si l'objet est un label et si son tag n'est pas vide alors assigne lui la valeur contenue dans la case don le numéro correspond au tag du dit label. c'est comme apprendre a lire ... il faut le faire a voix haute... voir su papier c'est encore mieux... souvent sur des système récurssif complexe je le fait encore. Moins de texte dans une signature c'est agrandir son espace. |
123456 |