VB2005 - Test TextBox Si Chiffre...Résolu

Question

Bonsoir à tous, cela fait déjà quelques heures que j'écume le net mais pas de réponses à ma question....
Voila le problème :

        rouge = "C:\Programmation	ables	ablesouge.gif"

        If (2 * 0 = res_2_0.Text) Then
            Picture_2_0.Image = Image.FromFile(vert)
        Else
            Picture_2_0.Image = Image.FromFile(rouge)
        End If

Tout se passe bien si dans le textbox "res_2_0" il y a un chiffre ou un nombre mais si il y a autre chose: plantage et c'est normal car un nombre ne peut pas être égal à une lettre.
Comment contourner le problème en vérifiant si le textbox contient uniquement des chiffres.

Merci pour toutes réponses.

PCPT · Accepted Answer

salut

isnumeric

mais quel est l'intérêt de faire un test sur 2*0 ?
Picture_2_0.Image = Image.FromFile(iif(res_2_0.Text="0", vert, rouge))

++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

cs_Exploreur · Answer

Salut,


Regarde du côté de : InStr


Cela te renvois la position d'une occurance trouver dans une chaine


Exemple : 


Dim Toto as String
Dim MyPos as Integer

Toto = "res_2_0"
MyPos = Instr(Toto,"2")

Msgbox MyPos << Te renvois 5 la position du 2

Reste plus cas faire une boucle sur tout le chiffres...


A+
Exploreur

 Linux a un noyau, Windows un pépin

cs_AsY4eVer · Answer

Merci beaucoup à vous deux !!!! Je vais utiliser le isnumeric . 
Pour te répondre PCPT : je code un logiciel de multiplication pour enfants, il se trouve que je fais la table de 2 et pour mieu m'y retrouver je marque 2*0.

VB2005 - Test TextBox Si Chiffre...

3 réponses

Votre réponse