这将做到这一点:
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()
附加循环计数器.... – 2010-02-23 00:30:27