CODE VB

Fermé

mikdebabi Messages postés 4 Date d'inscription jeudi 8 janvier 2015 Statut Membre Dernière intervention 27 janvier 2015 - Modifié par pijaku le 27/01/2015 à 08:05
eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 - 29 janv. 2015 à 09:41

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:

CODE VB
Code asci - Guide
Code puk bloqué - Guide
Code telephone oublié - Guide
Code blocks free - Télécharger - Langages
Code windows 10 - Guide

3 réponses

Réponse 1 / 3

kayajiro Messages postés 58 Date d'inscription lundi 17 janvier 2005 Statut Membre Dernière intervention 27 janvier 2015
27 janv. 2015 à 03:18

label1.text = "le text"
ou mieu une msgbox

msgbox "erreur"

Réponse 2 / 3

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
27 janv. 2015 à 08:08

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

Réponse 3 / 3

eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 7 213
Modifié par eriiic le 29/01/2015 à 00:39

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

Whismeril Messages postés 19028 Date d'inscription mardi 11 mars 2003 Statut Non membre Dernière intervention 24 avril 2024 931
29 janv. 2015 à 07:01

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....

--

eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 7 213
29 janv. 2015 à 09:41

Bonjour,

C'est pareil.
eric

Discussions similaires

Code de renvoi d'appel : Ooredo, Mobilis...

Acces à snapchat temporairement désactivé

code d'activation GTA 5 steam

Erreur 80072EFE windows update

Discussions similaires

Newsletters