Loop em uma string

[MRMB]

Pessoal,

Preciso percorrer uma string , caracter por caracter. Meu dificuldade e a sintaxe no visual basic 6.

No caso preciso percorrer uma string para saber se a esses valores ("A".."F", "a".."f")

Desde já agradeço.

Editado Agosto 20, 2008 por Crispim

[kuroi]

fiz uma bem rapida pra você:

For i = 1 To Len(palavra)
     MsgBox "Caratere nº " & i & ": " & Mid(palavra, i, 1)
Next[/code]
a funcao mid, pega um pedaco da string. os parametros são, na ordem, a string, a posicao inicial do pedaco q você quer e (opcional) o tamanho do pedaco q você quer.

[MRMB]

Rapaz muito bom mesmo! Não conhecia essa função não.

Teria como validar se valor retornado pela função MID esta entre esse valores ("A".."F", "a".."f").

estou tentando validar isso.

Desde já agradeço.

Editado Agosto 20, 2008 por Crispim

[kuroi]

então, foi pra você q eu passei o InStr() em algum tópico ai?? você pode usa-lo tipo assim:

For i = 1 To Len(palavra)
    letra = Mid(palavra, i, 1)
    If InStr("0123456789ABCDEF", letra) = 0 Then
        MsgBox "Não é hexadecimal"
        Exit For
    End If
Next[/code]
se tiver problemas com case (maiusculo - minusculo), use um UCase() pra transformar a letra em maiuscula.

[MRMB]

Rapaz..Excelente!

Estava fazendo de uma forma bem mais complicada aqui....

Seu modo e mais simples e prático!

Em relação a função inStr não foi eu não.

Mas você deu um help no tópico "Validar se uma string e Hexadecimal"

Obrigado!