Encore un pb sous VB
coin
Messages postés
50
Date d'inscription
Statut
Membre
Dernière intervention
-
teebo Messages postés 33491 Date d'inscription Statut Modérateur Dernière intervention -
teebo Messages postés 33491 Date d'inscription Statut Modérateur Dernière intervention -
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?
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?
A voir également:
- Encore un pb sous VB
- Vb - Télécharger - Langages
- Vb cable - Télécharger - Audio & Musique
- Vb editor - Télécharger - Langages
- Vb runtime - Télécharger - Divers Utilitaires
- Vb express - Télécharger - Langages
6 réponses
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
ö,ö
\_/
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
ö,ö
\_/
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?
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?
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...
ö,ö
\_/
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...
ö,ö
\_/
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
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 !
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 !