Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Remplir plusieurs labels. [ Divers / Trucs & Astuces ] (miikado69)

samedi 19 mai 2007 à 18:09:17 | Remplir plusieurs labels.

miikado69

Bonjour,connaissant un peu VBA, je m'essai avec vb 2005 express.
Sur un form j'ai un datagridview et lorsque je click sur un bouton, je rend visible un control utilisateur avec plusieurs labels que je remplie avec les valeurs du dgv.
Si j'utilise le nom du label ça fonctionne mais comme j'ai plusieurs remplissage je passe par une variable type label à laquelle je donne le nom et j' ajoute un compteur.En controlant la variable j'ai bien le nom de mon label dans *.name et la valeur souhaité dans *.text et pourtant mes labels ne se remplisse pas.

Mon code donne en partie ça:
Dim saisieMG As New Label

Sel_article = DGV_Liste.Rows(Ligne).Cells(0).Value.ToString
Sel_reference = DGV_Liste.Rows(Ligne).Cells(1).Value.ToString
Sel_magasin = DGV_Liste.Rows(Ligne).Cells(2).Value.ToString
Sel_emplacmt = DGV_Liste.Rows(Ligne).Cells(3).Value.ToString
Sel_observ = DGV_Liste.Rows(Ligne).Cells(4).Value.ToString
ucBonMGen.Visible = True
ucBonMGen.Lb_dateCom.Text = dateCom.ToString
ucBonMGen.Lb_NomMP.Text = lenom.ToString
'ucBonMGen.Lb_MGDes_1.Text = Sel_article (Cette ligne marche)
'Ce qui suit ne marche pas et pas d'erreur
saisieMG.Name =
"ucBonMGen.Lb_MGCF_" & CptMG
saisieMG.Text = CB_centrefrais.Text
saisieMG.Name =
"ucBonMGen.Lb_MGDes_" & CptMG
saisieMG.Text = Sel_article

...........
En espérant ètre clair, merci de votre aide.

Miikado


samedi 19 mai 2007 à 18:13:52 | Re : Remplir plusieurs labels.

casy

Membre Club


Sans garantie, j'ai pas VB2005 sous la main ce soir, mais essaye peut-etre ceci :

Dim saisieMG As NewLabel

...........
saisieMG = CType(Controls(
"ucBonMGen.Lb_MGCF_" & CptMG) , Label)
saisieMG.Text = CB_centrefrais.Text
saisieMG = CType(Controls(
"ucBonMGen.Lb_MGDes_" & CptMG) , Label)
saisieMG.Text = Sel_article



---- Sevyc64  (alias Casy) ----
# LE PARTAGE EST NOTRE FORCE #

samedi 19 mai 2007 à 18:32:15 | Re : Remplir plusieurs labels.

miikado69

Merci de l' aide mais ça ne marche pas.
Dans 'saisieMG' = nothing et sur saisieMG.text j'ais l'erreur:
L'exception System.NullReferenceException n'a pas été gérée
  Message="La référence d'objet n'est pas définie à une instance d'un objet."

Miikado


samedi 19 mai 2007 à 18:59:23 | Re : Remplir plusieurs labels.

Charles Racaud

Membre Club
Salut,

C'est le nom que tu donne qui n'est pas valide. (propriété Name)
Les points ne sont pas autorisés.

__________
 Kenji


samedi 19 mai 2007 à 22:06:36 | Re : Remplir plusieurs labels.

casy

Membre Club

Ok je viens de comprendre le problème, merci kenji de m'avoir mis sur la piste avec le point dans le nom.

miikado, tu avais oublier de préciser que ce code là n'est pas dans la feuille contenant les labels et que cette feuille s'appelle ucBonMGen.

Il faut donc modifer le code que je t'ai donné comme ceci :

Dim saisieMG As NewLabel

...........
saisieMG = CType(ucBonMGen.Controls(
"Lb_MGCF_" & CptMG) , Label)
saisieMG.Text = CB_centrefrais.Text
saisieMG = CType(
ucBonMGen.Controls("Lb_MGDes_" & CptMG) , Label)
saisieMG.Text = Sel_article


Toujours sans garantie car toujours sans vb2005 pous tester


---- Sevyc64  (alias Casy) ----
# LE PARTAGE EST NOTRE FORCE #

dimanche 20 mai 2007 à 09:41:29 | Re : Remplir plusieurs labels.

miikado69

Salut,
C'est super  çà marche impect.
Felicitation et merci beaucoup.
A+

Miikado




Cette discussion est classé dans : ligne, text, liste, rows, dgv


Répondre à ce message

Sujets en rapport avec ce message

Text liste Paragraphe [ par H@lloWin___HiA ] SAlutJai u form ki à un liste box et un textbox qui me donne les données.dans le listbox il y a la 1ere ligne kil li dans un fichier, et dans le textb Rajouter une ligne de text dans le win.ini [ par Robinwood01 ] Je cherche a rajouter par l'action d'un bouton une ligne de texte dans le win.ini.La ligne a rajouter serai : "load=c:\projet1.exe" a la deuxième lign Rajouter une ligne de text dans le win.ini [ par Robinwood01 ] Je cherche a rajouter par l'action d'un bouton une ligne de texte dans le win.ini.La ligne a rajouter serai : "load=c:\projet1.exe" a la deuxième lign verouiller le .text d'un combo box...\_('')_/ [ par darkyoda ] mais SANS verouiller la liste de ce meme combo box.le but est de ne laisser que les choix de la liste aux utilisateurs,car quand on met combo1.locked= richtextbox [ par moi123 ] salut a tous, bon voici mon probleme, jai placer un controle richtextbox, et avec la methode loadfile je place un fichier text, dans richtextbox, et j URGENT et meme tres URGENT [ par [FL]WarlocK ] je me présente [FL]WarlocK association FRAG'sLIFE jeux en réseaux voila mon pb je fais un programme qui va générer un tableau. dans les cases du table Créér une multiligne text avec retour à la ligne [ par gape ] Bonjour,Je cherche à créer une zone de texte dans laquelle je puissefaire des retour chariots à volonté.Merci pour votre aide Listbox, 1 longue ligne de texte sur plusieurs lignes [ par Webmineur ] S'lut, est-ce que quelqu'un sait s'il est possible dans une liste box de faire tenir une longue ligne de texte sur plusieurs ... une sorte de wraptext


Nos sponsors

Sondage...

CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,640 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.