boucle pour une variable chaîne

Question

ceci est mon code -

for i as integer = 0 to rows.count - 1 
    output &= "Name =" & row(i)("Name") 
    output &= "lastName =" & row(i)("lastName") 
... 50 more fields 
next 

i besoin que la sortie soit comme celui-ci

Applicant1Name = MikeApplicant1lastName = ditkaApplicant2Name = TomApplicant2lastName = Brady ...

comment est-ce que je fais cela sans mettre le code suivant 50 fois - sortie & = "Demandeur" & i.tostring() + 1 & "Name =" & rangée (i) ("Nom") ... et ainsi de suite. Y at-il un moyen de faire une boucle pour et exécuter le candidat 1,2,3,4 .... en un seul coup? merci

Answer 1

Vous ne pouvez vraiment pas comme vous essayez d'ajouter 50 champs différents. La seule chose que vous pouvez raccourcir le nom de la variable:

Dim strLN as String = row(i)("lastName") 
Dim strFirstName as String = row(i)("firstName") 

Ensuite, vous mettez simplement tous ensemble

output &= strLN & strFirstName...etc 

Answer 2

semble que vous voulez créer un tableau de tous les champs que vous avez et inclure une boucle imbriquée.

Dim fields As String() = {"Name", "LastName", "SSN", "Birthdate"} 
    Dim output As String = "" 

    For i As Integer = 1 To rows.count 
     For Each field As String In fields 
      output = String.Concat(output, "Applicant ", i, field, "=", row(i)(field), " ") 
     Next 
    Next 

Answer 3

Essayez:

Dim output as New StringBuilder("") 

For i as Integer = 0 To rows.Count - 1 
    output.append("Applicant" + i.ToString()) 
    Foreach(col as DataColumn in dt.Columns) ' The datatable where your rows are 
     Dim colName as string = col.ColumnName 
     output.append(colName & "=" & rows(i)(colName).ToString()) 
    Next 
    If i < rows.Count - 1 Then output.Append("|") 
Next 

StringBuilder est plus rapide pour les concaténations de chaînes, et si vous gardez vos lignes dans un DataTable (que je suppose que se passe parce que ce à quoi ça ressemble vous les accès) , alors vous pouvez simplement parcourir les noms de colonnes au niveau supérieur.