Text Box et collectionsRésolu

Question

Salut, j'ai un form avec beaucoup de text box. Je veux, pour chaque Text Box, faire cette verification:



    If myTextBox.Text = "" then myTextBox.Text="0"



Mais j'aimerais eviter d'avoir autant de lignes que j'ai de text box, avec un code du type



    for each txtBox as TextBox in ???

         If txtBox.Text = "" then txtBox.Text="0"

   Next





Mais je ne sais pas comment creer ma collection de text box. Avez-vous une suggestion? merci!



Thefada

thefada · Accepted Answer

Dim TextBoxesCollection As New Collection

            TextBoxesCollection.Add(txtBox1)

            TextBoxesCollection.Add(txtBox2)

            ...

            TextBoxesCollection.Add(txtBox3)



For Each txtBox as TextBox in TextBoxCollection

   If txtBox.Text = "" then txtBox.Text="0"

Next









Lol c'etait pas si dure en fait ^^



Thefada

PCPT · Answer

ouai, sauf que t'as autant de lignes que de contr&#244;les (cf d&#233;claration)

dim TB as TxtBox
For each TB in Me
   If TB.Text="" then TB.Text="0"
next TB

PCPT

thefada · Answer

Oui en effet bonne remarque mais en verite mes operations sur les text
box etaient plus complexes qu'une simple verification, donc ca me
convient. Je ne peux pas utiliser ta solution telle quelle car je ne
travaille ici que sur la moitie des text box de mon form. Merci quand
meme, c'est assez fute.