2 Duvidas....

[gabrielfast]

estou usando esse comando para ler meu arquivo TXT:

n = FreeFile()

Open "c:\exporta.txt" For Binary As #n

texto = Input(LOF(n), n)

Close #n

com eu faço para ele me da o total de linhas?

eoutra duvida....por exemlo...se ele tiver 10 linhas...dai eu qro fazer uma analize de todas as linhas. Dai vou fazer um Do while, ok?

mais se eu achar o malor q eu qro na linha 5..como faço para interromper o Do while?

valeu

gabriel

[Decio]

com eu faço para ele me da o total de linhas?

eoutra duvida....por exemlo...se ele tiver 10 linhas...dai eu qro fazer uma analize de todas as linhas. Dai vou fazer um Do while, ok?

O total de linhas que eu saiba , você vai ter que fazer um do while até o fim do arquivo, incrementando uma váriavel para saber o total de linhas.

Para sair de um do while , bastaria dar um "end do":

 n = 10
  Do
  n = n - 1
     If n = 3 Then Exit Do
   Loop