Problema con bucle While en vb 6.0

Iniciado por merlin, 13 Abril 2007, 09:25 AM

0 Miembros y 1 Visitante están viendo este tema.

merlin

Hola,estoy haciendo un bucle while,y lo que quiero hacer es que
dada una determinada condicion dentro del bucle,este no siga con las siguientes instrucciones,y continue con una nueva iteracion del bucle.
Ejemplo:

Open Dir_Entrada For Input As #NumArchivo
While Not EOF(NumArchivo)
Line Input #NumArchivo, texto
If (Mid(texto, 1, 1)) = "(" Then
aux = Mid(texto, 2, Len(texto) - 2)
End If
texto = Eliminar_Nulos(texto)
If aux = "Entidad Colaboradora" Then '
' y aqui que me vuelva otra vez al inicio con una nueva iteracion ' para podeer leer la linea siguiente , si pongo otro wend me da
' error
End If
Wend

Vuestra paciencia y ayuda son apreciadas
Salu2
100% ESPAÑOL

Hans el Topo

#1
if not condicion
  'hacer lo que quieras
endif
'seguirá solito
 

Sancho.Mazorka

Usen las etiquetas de code  :)


Sancho.Mazorka    :¬¬
Ganador Xeon Web Server ! ! !    Sancho.Mazorka :D
http://foro.elhacker.net/index.php/topic,171903.75.html