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