Salir de un bucle for next
Publicado por Silvia (185 intervenciones) el 09/04/2006 21:47:29
Hola buenas noches, tengo una consulta:
Vereis imaginad que teneis una base de datos de access con 5000 registros y hacemos un bucle para movernos por todos los registros desde el principio hasta el fin:
For x = 0 To 4999
Dim DR1 As Data.DataRow = dt.Rows(x)
' Aqui hacemos algo con los campos de cada registro
next
Me acabo de dar cuenta de que una vez que inicias el bucle ya no lo puedo detener ni salirme de él hasta que llegue al final.
Intenté añadir algo así
For x = 0 To 4999
if textbox1.text="salir" then exit for:exit sub' linea que añado para salirme del bucle
Dim DR1 As Data.DataRow = dt.Rows(x)
' Aqui hacemos algo con los campos de cada registro
next
Pero ni aun así se sale de bucle y continua trabajando hasta llegar al final de la base de datos.
No se si hago algo mal o no.
Por favor dadme una idea de como hacer para salirme del bucle.
Incluso si me desconecto de la pagina de internet y vuelvo a la pagina el bucle sigue trabajando.
Ayudadme por favor.
Gracias.
Vereis imaginad que teneis una base de datos de access con 5000 registros y hacemos un bucle para movernos por todos los registros desde el principio hasta el fin:
For x = 0 To 4999
Dim DR1 As Data.DataRow = dt.Rows(x)
' Aqui hacemos algo con los campos de cada registro
next
Me acabo de dar cuenta de que una vez que inicias el bucle ya no lo puedo detener ni salirme de él hasta que llegue al final.
Intenté añadir algo así
For x = 0 To 4999
if textbox1.text="salir" then exit for:exit sub' linea que añado para salirme del bucle
Dim DR1 As Data.DataRow = dt.Rows(x)
' Aqui hacemos algo con los campos de cada registro
next
Pero ni aun así se sale de bucle y continua trabajando hasta llegar al final de la base de datos.
No se si hago algo mal o no.
Por favor dadme una idea de como hacer para salirme del bucle.
Incluso si me desconecto de la pagina de internet y vuelvo a la pagina el bucle sigue trabajando.
Ayudadme por favor.
Gracias.
Valora esta pregunta


0