Discussion :

[Rifton007]

Bonjour à vous tous et merci d'avance pour votre aide.
Le code fonctionne, mais j'aimerais tout de même avoir si il est possible d'ajouter les éléments l'un derriére l'autre, au lieu de une ligne pour chaque.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
        Dim inputlist As List(Of TextBox) = New List(Of TextBox)
 
        inputlist.Add(txt_addname)
        inputlist.Add(txt_addphone)
        inputlist.Add(txt_addmail)
 
        check_empty(inputlist)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
    Sub check_empty(ByVal input_list)
        For i As Integer = 0 To input_list.Count - 1
            input_list(i).text = "vide"
        Next i
 
    End Sub

[carlfil]

Salut,

Si j'ai bien compris c'est ça que tu cherches à faire?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

inputlist.Add(txt_addname & "-" & txt_addphone & "-" & txt_addmail )

Cordialement

[Rifton007]

Merci pour ta précieuse aide, c'est effectivement ce que je voulais faire.
Thanks,

[Rifton007]

Finalement, je pense avoir crier victoire trop vite. Il y'a une erreur dans la solution.
Pour ceux qui risquerait de ce planter à cause de moi.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
inputlist.Add(txt_addname & "-" & txt_addphone & "-" & txt_addmail)

Erreur 1: L'opérateur '&' n'est pas défini pour les types 'System.Windows.Forms.TextBox' et 'String'.

Cela reste donc toujours un mystére.

[rv26t]

Bonjour,

Tes TextBox sont des contrôles, tu ne peux que les ajouter les uns après les autres dans ta liste de contrôles. (une ligne pour chaque)

A+, Hervé.

[Rifton007]

D'accord, merci pour cette réponse.