Visual Basic - Dúvida com Variantes?

Question

Pessoal, preciso de uma maneira para fazer uma comparação entre duas variáveis... a primeira vai conter + de 150 caracteres desordenados e aleatórios, e a segunda irá conter uma seguência de 07 caracteres. Preciso fazer a comparação entre essas duas variáveis e retornar uma valor booleano. O problema é que a checagem deve ser feita com os 07 numeros em sequencia, por exemplo: abcdefg= Sim e bacdefg=Não...entederam? Alguém sabe como fazer isso???

Answer 1

Xi, não entendi muito bem... Você tem um string que é "abcdefg" nesta ordem e quer saber se ele está dentro de outro de até 150 caracteres, é isso? Ou quer comparar apenas os 7 primeiros caracteres de cada variável? Mande mais detalhes!

Se for o segundo caso, mais facil, deve ser algo do tipo (supor que tenho duas caixas de texto para por as strings e uma terceira para a resposta):

texto1 = TextBox1.Text
texto2 = TextBox2.Text

If Mid$(texto1, 1, 7) = Mid$(texto2, 1, 7) Then
TextBox3.Text = "yes!"
Else
TextBox3.Text = "Não são!"
End If

Se não for o caso acima, mas tem de encontar a string "inteirinha" dentro da outra, dá para ir variando os valores 1 e 7 dentro de um laço para i e i+7 e fazer o valor de ir variar de i até o tamanho da string maior - 7, algo assim:

texto1 = TextBox1.Text
texto2 = TextBox2.Text
achou = 0
For i = 1 To Len(texto2) - 7
If Mid$(texto1, 1, 7) = Mid$(texto2, i, 7) Then
achou = 1
End If

Next i

If achou = 1 Then
TextBox3.Text = "yes!"
Else
TextBox3.Text = "Não são!"
End If


Daria também para mudar a variável achou para achou=achou +1 caso que ele conte quantas vezes aparece lá dentro... mas explique melhor ou veja se era isso!

Answer 2

http://www.apostilando.com
tem umas apostilas legais para vcla

Answer 3

Infelizmente não sei responder, mas posso te desejar
BOAS FESTAS. *bjussss*