Ciao a tutti...
sto facendo un programmino di crittografia e mi sorge un problema!
allora io prendo una stringa, inizio a fare il controllo su ogni singola lettera e se è diversa da chr(32) incremento il contatore, quando è uguale a chr(32) mi fermo e converto la parola a seconda del numero di lettere che ha la parola...
fino a qui tutto bene! mi sono accorto poi che mi conta l'invio(chr(13) per l'appunto) come se fosse una lettera...
quindi ho messo nel controllo iniziale, oltre a chr(32) anche chr(13)...
ma non me lo prende!
spero di essere stato il piu chiaro possibile...
For a = 0 To fine
carattere = stringa.Substring(a, 1)
Do While carattere <> Chr(32) And carattere <> Chr(13)
If a < fine Then
conta = conta + 1
a = a + 1
If a < fine Then
carattere = stringa.Substring(a, 1)
End If
Else
carattere = Chr(32)
End If
Loop
ReDim vettore(0 To conta - 1)
For i = 0 To conta - 1
vettore(i) = stringa.Substring(v, 1)
v = v + 1
Next
For i = 0 To conta - 1
cambio(conta, vettore(i))
newstringa = newstringa + vettore(i)
Next
If a < fine Then
newstringa = newstringa + Chr(32)
conta = 0
b = a + 1
v = a + 1
End If
Next
mi date una mano pls?