dada con dos consultas a la base de datos

[mveraa]

hola me falla si lo pongo en el form1

sql = "SELECT * WHERE pep"

comandos.CommandText = sql
comandos.CommandType = CommandType.Text
comandos.Connection = conexion

lect = comandos.ExecuteReader()

While lect.Read()
MsgBox(lect(5))
End While
lect.Close()

comandos.ExecuteReader(CommandBehavior.CloseConnec tion)


si lo pongo al final de la consulta en el form1 sale este error
There is already an open DataReader associated with this Connection which must be closed first.



si lo pongo en el principio de la busqueda del otro form sucede algo similar..

saludos y gracias por la orientacion