in un ciclo concateno una stringa ad una già esistente

codice:
dim miastringa as string
dim i as integer
miastringa=""
for i=0 to 100
  miastringa=miastringa & "questa è la stringa numero " & i & vbcrlf
next i
all'aumentare della lunghezza della stringa però l'operazione di somma diventa sempre più lenta.

C'è un modo per evitare il rallentamento?