URGENT: eviter les erreurs sur chaine port serie

Question

je recupere une chaine complete sur mon port serie, ou je vient ne retenir q'un nombre a 5 chiffres sur toute la chaine recue avec la commande Label2.Caption = Mid(tampon, 20, 10)
comment faire pour deceler si ce que j'ai recue et ce que je selectionne correspond bien a mon nombre qui est variable
si cela est different d'un nombre a 5chiffres j'affiche un msgbox
merci d'avance de votre aide
je suis en vb6

cs_norber59480 · Answer

Salut,
Si je comprend bien toi tu veux absolument recevoir une chaine de caractere qui comporte 5 chiffre!!!
Tu peux verifier la longueur de ta chaine par l'intermédiaire de la fonction len.

x=len(chaine)
If x<>5 then
message box
Else
suite du programme.
end if