这样就可以了:
for i = 0 as integer to 100
result &= "ApplicantName" & i.ToString() & " = " & sqldr("name")
result &= "Lastname" & i.ToString() & " = " sqldr("lastname")
result &= "dob" & i.ToString() & " = " sqldr("dob") & "\n\n"
next
但是,为了获得更好的性能,您应该使用string.Format 和StringBuilder:
Dim sb as StringBuilder = new StringBuilder()
for i = 0 as Integer to 100
sb.Append(String.Format("ApplicantName{0} = {1}", i, sqldr("name"))
sb.Append(String.Format("Lastname{0} = {1}", i, sqldr("lastname"))
sb.Append(String.Format("dob{0} = {1}\n\n", i, sqldr("dob"))
next
Dim result as String = sb.ToString()
StringBuilder 也有一个 AppendFormat 重载,这使得这更容易:
Dim sb as StringBuilder = new StringBuilder()
for i = 0 as Integer to 100
sb.AppendFormat("ApplicantName{0} = {1}", i, sqldr("name")
sb.AppendFormat("Lastname{0} = {1}", i, sqldr("lastname")
sb.AppendFormat("dob{0} = {1}\n\n", i, sqldr("dob")
next
Dim result as String = sb.ToString()