encore mon logiciel de numero fetiche

Question

Private sub form_load()
Dim numerofetiche
Dim message, Titre As String
message = "nom et prénom?"
Titre = "entrez vos noms et prénoms svp"
numerofetiche = inputbox (message, titre)
numerofetiche = Val (numerofetiche)
msgBox numerofetiche, vbOkOnly + vbInformation, "votre numero fetiche est le:"
End Sub

voila mon code source le seule probleme que j'ai c'est que lorsque qu'il modifie la chaine de caractere pour la transformé en nombre il me mets toujours zero dans l'aplli est je sais pas pourquoi!!

merci d'avance d'aider un pauvre débutant ;-)

pcpunch · Answer

c normal la fonction val ne convertit pas des lettre en chiffre!!!

La fonction Val arrête la lecture de la chaîne au premier caractère ne faisant apparemment pas partie d'un nombre. Les symboles et caractères fréquemment associés aux valeurs numériques, comme le signe $ et les virgules ne sont pas reconnus. En revanche, la fonction reconnaît les préfixes &O (pour octal) et &H (pour hexadécimal). Les espaces, les tabulations et les caractères de saut de ligne ne sont pas pris en compte dans l'argument.

Je serais toi je convertirai  la string en nb en fonction du code ascii!!!

Encore mon logiciel de numero fetiche

1 réponse

Discussions similaires