CODE VB

mikdebabi Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -  
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
SVP J'AI UN Soucis avec mon code vb en faite je veux afficher un label " erreur " quand
l'utilisteur entre un mot dans un textbox plutôt que d'y entrer une valeur entier...
mon code 
 Dim x As Single = 0
        Dim y As Integer = 0

        x = Me.PriUnitair.Text
        y = Me.Qté.Text

if me.priunitaire.text not is numeric then
 me. label1.texte veuillez entrer un nombre
end if


A voir également:

3 réponses

Réponse 1 / 3
kayajiro Messages postés 58 Date d'inscription   Statut Membre Dernière intervention  
 
label1.text = "le text"
ou mieu une msgbox

msgbox "erreur"

0
Réponse 2 / 3
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Bonjour,

En VB je ne sais pas, mais n'existe t'il pas, comme en VBA, une méthode keypress pour les TextBox?
Si oui, regarde ce code et inspire t'en : 

Private Sub TextBox3_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
'Evénement : Dans le TextBox3, lors de l'appui sur une touche du clavier
'Empêche la saisie d'autre chose que des chiffres
If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
End Sub

0
Réponse 3 / 3
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Bonjour,

J'aurais plutôt écrit : 
if not me.priunitaire.text is numeric then

eric
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
0
Utilisateur anonyme
 
Bonjour ok pour Vb.net mais la version de vu n'étant pas précisée ça pourrait aussi bien être du VBA, VB6 ou VBS....
D'où l'importance de préciser cette version....

--
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Bonjour,

C'est pareil.
eric
0

Discussions similaires

sertissage des cables rj45
lekludo -
brupala -

7 réponses