Bonjour a tous,
 
 
J'ai un souci avec la concaténation, je saisie un nom et un prénom et ils doivent etre ajouté a une liste mais séparer par un espace, mais cela ne marche pas voici mon code
 
 
 
Private Sub BC_calculer_Click()
 

If (zt_nom.Text <> "" ) And (zt_prenom.Text <> "" ) Then
 
L_nom_prenom.AddItem (zt_nom.Text) & (zt_prenom.Text)
 
 
Else
MsgBox ("il faut saisir un nom" )
 
End If
 
If (L_nom_prenom.ListCount > 0) Then
BC_calculer.Enabled = True
End If
 
 
zt_nom.Text = ""
zt_nom.SetFocus
 
zt_prenom.Text = ""
zt_prenom.SetFocus
 
 
End Sub

           Bonjour.
 
           C'est la ligne n° …   Ah zut, l'icône pour le code n'a pas été utilisée, dommage …
 
           "mais cela ne marche pas"       Et dans le code où se trouve donc l'espace ?

Bonjour.
 
5 caractères à rajouter..  
 
Bon allez, je te les donne : & " "

           Je dirais 6 avec l'espace après le dernier guillemet ou bien avant le & …
 

1 Private Sub BC_calculer_Click()
 
 
2 If (zt_nom.Text <> "" ) And (zt_prenom.Text <> "" ) Then
 
3 L_nom_prenom.AddItem (zt_nom.Text) & (zt_prenom.Text)
 
 
4 Else
5 MsgBox ("il faut saisir un nom" )
 
6 End If
 
7 If (L_nom_prenom.ListCount > 0) Then
8 BC_calculer.Enabled = True
9 End If
 
 
10 zt_nom.Text = ""
11 zt_nom.SetFocus
 
12 zt_prenom.Text = ""
13 zt_prenom.SetFocus
 
 
14 End Sub
 
 
 
a la ligne 3 jai rajouter & " " mais cela ne marche pas

 
           Merci de nous montrer la ligne corrigée parce que là on ne voit rien de nouveau !
 
           Sinon c'est l'icône avec un C pour le code …
 

1 Private Sub BC_calculer_Click()
 
 
2 If (zt_nom.Text <> "" ) And (zt_prenom.Text <> "" ) Then
 
3 L_nom_prenom.AddItem (zt_nom.Text) & " " (zt_prenom.Text) <-------- modification sans résultat
 
 
4 Else
5 MsgBox ("il faut saisir un nom" )
 
6 End If
 
7 If (L_nom_prenom.ListCount > 0) Then
8 BC_calculer.Enabled = True
9 End If
 
 
10 zt_nom.Text = ""
11 zt_nom.SetFocus
12 zt_prenom.Text = ""
13 zt_prenom.SetFocus
14 End Sub

 
           Normal car schématiquement, concaténer avec l'opérateur & trois éléments A, B et C :
 
                                  A & B & C
 
           Toi tu as fait :   A & B C
 
           C'est comme pour l'addition de trois nombres, si un signe + est oublié …
 
 

L_nom_prenom.AddItem (zt_nom.Text) & " " & (zt_prenom.Text)
 
Voici la réponse..