encore un pb sous VB Fermé

Question

Bonjour a tous Alors voila: Je voudrais que quand 1 utilisateur entre une date dans une combo, : 1 certaine feuille s'affiche et que dessus s'ajoute une Label. PB: il ne m'ajoute pas La Label sur la bonne feuille. J'ai fait comme ca : If date1>=1/10/2002 and date1 <= 30/11/2002 then F=1 Elseif date1>= 1/12/2002 And date1 <=31/01/2003 then F=2 ...etc end if For F=1 To 52 Forms(F).show Forms(F).Controls.Add "VB.Label", "nomdelabel" with Form(F)!nomdelabel (ensuite; la je met ttes les caractéristique de la label a ajouter) En fait, ca me marque bien une label mais sur la feuille en cours, pas sur celle qu'il faudrait. Pdt que j'y suis (pardon pour la longueur du message) il ne peut m'ajouter qu'1 label ayant pour nom : nomdelabel. Je voudrais qu'il puisse m'en ajouter une autre si l'utilisateur saisi une autre date. Il doit y avoir moyen de jouer avec l'index mais dans le code ca marche po! y'a qqun qui pourrait m'aider?

teebo · Answer

Salut re moi...Je t'ai peut etre enduit d'erreur. Forms(F) te renvoie le Fieme control de ta forme il me semble...Il te faut remplacer tes F=x par FormToUpdate= Formxö,ö\_/

teebo · Answer

Sinon pour indexer to label, quel est le probleme avec un indice i que tu incrementes?ö,ö\_/

coin · Answer

salut teeboréponse 1:donc, je ne marque pas de F=1 to 52 ?et apres, au lieu de mettre forms(F)! nomdelabelje met quoi?form!nomdelabel?réponse2:un indice i que j'incrémente??genre :     form ! nomdelabel(i)index=index+1un truc comme ca?

teebo · Answer

A la place de F=1 tu mets set FormToUpdate=LeNomDeLaFormeQueTuVeuxChanger 'en ayant defini FormToUpdate precedement du type formApres tu mets FormToUpdate.controls.add ...puiswith FormToUpdate.GetControl ("NomLabel")Je suis plus sur de GetControl, peut etre GetControlByName., mais bon c'est un truc du genrePour l'indice, ce que tu proposes doit pouvoir marcher mais je prefere la solution de nommer ton label "MonLabel" & i avec i que tu incrementes, et avec la methode createcontol et getcontrol, tu as acces a ton label meme sans savoir son nom exact puisque tu le fais avec la chaine de son nom...ö,ö\_/

coin · Answer

Ca marche, merci teebo.Par contre, je ne me suis pas servi de GetControl parce que je ne comprends pas a quoi ca sert  et comment ca marche  8-(bon, j'men va a la recherche de nouveaux problèmes avec VB !

teebo · Answer

Tu en trouveras t'inquietes pas :o)Pour getcontrol, ca te permet de recuperer le control en ayant son nom stocke dans une variable string...tres pratique pour recuperer un control creer automatiquement...ö,ö\_/

Encore un pb sous VB

6 réponses

Discussions similaires