Espace dans Résultat à l'affichage

Résolu
Bonjour,
voici un code qui liste un ensemble de données provenant d'une table.
Seul problème,les données sont comme concaténées.
J'arrive pas à insérer un espace par exemple entre le champ et le second champ.

Dim sSelectSQL5 As String
sSelectSQL5 = "select NomFamille,Prénom from Employes where Email='" & Label3.Text & "'"
'Make the OleDbCommand objectNomFamille, Prénom
Dim cmdSelect5 As New Data.OleDb.OleDbCommand(sSelectSQL5, cnAccess)
Dim drEmp5 As Data.OleDb.OleDbDataReader, sbResults5 As New StringBuilder()
drEmp5 = cmdSelect5.ExecuteReader()
Do While drEmp5.Read()
sbResults5.Append(drEmp5.GetString(0))
sbResults5.Append(drEmp5.GetString(1))
Loop
Label5.Text = sbResults5.ToString()


merci pour votre aide!
Configuration: Windows XP
Firefox 2.0.0.16

5 réponses

  1. et si tu faisais :

     Do While drEmp5.Read()
    Label5.Text = drEmp5.GetString(0) & " " & drEmp5.GetString(1)
    Loop
    


    1
    1. Bonjour,

      As-tu essayé de faire ça :
       Do While drEmp5.Read()
        sbResults5.Append(drEmp5.GetString(0)) & " "
        sbResults5.Append(drEmp5.GetString(1))
      Loop 
      0
      1. j'ai essayé mais il m'affiche l'erreur suivante:
        Fin d'instruction attendue
        0
        1. ouf!!
          merci Polux31!
          c'est correct!!
          0
          1. De rien, content de t'avoir aidé ...

            Dsl pour la première boulette ... je n'ai pas VB.Net pour pouvoir tester :-/

            Bonne continuation et bon courage.

            ;o)
            0