|
|
Postada em 29/06/2006 13:19 hs
boa tarde Como faço para pegar valores em um txt, valores separados pelo sinal de +. Exemplo:
em um txt tenho, 27+25+30, preciso pegar cada valor separado para efetuar calculos em porcentagem,( Valor tabela - 27% - 25% - 30%, isso eu sei fazer), só preciso retirar os valores do txt. agradeço |
|
|
|
|
|
kerplunk
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 29/06/2006 13:46 hs
Dim Conteudo as string
Dim Valores
Open "C:\Pasta\Arquivo.txt" for input as #1
do While Not Eof(1)
Line Input #1, Conteudo
Valores = Split(Conteudo, "+")
For i% = 0 to UBound(Valores)
Msgbox Valores(i%)
next i%
loop
|
|
|
|
Marcio1103
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 29/06/2006 14:11 hs
|
|
|
|
Cardoso G
|
PATOS DE MINAS
MG - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 29/06/2006 14:25 hs
kerplunk , pra que serve esse % do I do for? |
|
|
|
