Error de NullReferenceException en lectura de archivos VB.NET

[Bazookao]

Hola gracias por responder

pedon por haberme olvidaddo de este post si efectivamente es por que el fichero se acava y r.readstring ya no sabe que cargarle a las listas

Código VB.NET:

For i = 0 To num - 1            
objeto_archivo._d.Items.Add(r.ReadString)   
         ListBox1.Items.Add(r.ReadString)   
     Next
 

ahi num-1 le dice que el ciclo la va hacer un numero de veces de registros que tenga el archivo pero menos 1 por que empezamos desde cero
el problemas es que cada ves que se ejecuata el ciclo ahi dos r.readstring por lo tanto a la mitad se acava el archivo
por lo cual esto se soluciona de la siguintes formas

Código VB:

For i = 0 To (num - 1)*2    
        objeto_archivo._d.Items.Add(r.ReadString) 
           ListBox1.Items.Add(r.ReadString) 
   Next
 

spero a alguien le pueda ayudar mi post

Saludo a Toda la Comunidad
o

Código VB:

For i = 0 To num - 1     
cosa=r.ReadString
       objeto_archivo._d.Items.Add(cosa)      
      ListBox1.Items.Add(cosa)    
    Next