l'errore se non sbaglio vuol dire che va fuori indice cioè la grandezza da te richiesta è + grande di quella dovuta.

Praticamente se tu hai la stringa 12345 e chiedi di andare da 1 a 7 vai "out of bounds"


PS prova ad aprire il file cosi:
dim fs as new FileStream(Server.MapPath("FL13R42.21_200335.txt") ,FileMode.Open,FileAccess.Read)
dim objReader as new StreamReader(fs)

While objReader.Peek() > -1
tua_stringa = objReader.Read(tua_stringa, 0, 2)
End While

o prova pure cosi:

While objReader.Peek() > -1
tua_stringa = objReader.ReadLine(tua_stringa, 0, 2)
End While