retrouver un caractere alphabetique dans une chaine de caractere Résolu

Question

Bonjour,

Pouvez vous me donner un coup de main en vb. une ancienne version. framework1.1 ou 1.2   je crois.

j'ai une chaine de caractere numerique ou alphanumerique, et j'aimerais savoir si cette chaine contient ou pas 1 ou plusieurs caracteres alphabetique. Pas un caractere en particulier mais juste si il en contient un.

Merci,

NHenry · Accepted Answer

Bonjour,

En .NET, évite d'utiliser l'assembly Microsoft.VisualBasic :
Mid -> MaChaine.SubString
Replace -> MaChaine.Replace
UCase -> MaChaine.ToUpper

Pour un peu plus d'optimisation, tu peux mémoriser dans une variable le caractère utilisé, ça évitare de faire 6 appels à SubString.

Mon site

NHenry · Answer

Bonjour,

C'est soit 1.0 (2002) ou 1.1(2003), ensuite, on passe à 2.0(2005).

Sinon, je pense qu'avec MaChaine.IndexOf ou au pire, faire tout par une boucle For et MaChaine.SubString.

Mon site

GrayDog · Answer

Au faite je cherche un truc dans ce genre

If Mid(s, i, 1) Like "[a-zA-Z0-9]" Then

NHenry · Answer

Bonjour,

Ne marques "Réponse acceptée" que si la réponse résout ton pb.

Proposition :
for i As Integer=0 to s.Length-1
    If "0123456789ab...XYZ".Contains(s.SubString(i,1)) Then
        'Ok
    Else
        'Nok
    End If
Next

Mon site

NHenry · Answer

Ou sinon, voir les RegEx, mais je ne m'y connais pas assez.

GrayDog · Answer

Ahhh cool finalement j'ai fais comme ca et ca marche.... tu penses qu'on optimiser le code un peu plus... OI_type = "01" for i = 1 To len(num_employe) if mid(num_employe,i,1) >="A" And mid(num_employe,i,1) <="Z" then num_employe = num_employe OI_type = "A1" end if if mid(num_employe,i,1) >="a" And mid(num_employe,i,1) <="z" then num_employe = replace(num_employe,mid(num_employe,i,1),Ucase(mid(num_employe,i,1))) OI_type = "A1" end if Next

GrayDog · Answer

Merci, c'est cool de ta part tout ses conseils

Retrouver un caractere alphabetique dans une chaine de caractere

7 réponses

Votre réponse

Discussions similaires