High-Tech
Santé-Médecine
Droit-Finances
CodeS-SourceS
Inscription
Plan
Connexion
Rechercher un code, un tuto, une réponse
Accueil
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Tous les langages
Delphi / Pascal
Java
Python
SQL
RegEx
Flash
ASM
IRC
Graphisme
PDA
ColdFusion
Foxpro
Flex
Visual Basic / VB.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
PHP
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C/C++/C++.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Javascript
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C#/.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
ASP/ASP.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Accueil
Connexion
Déposer un code
Code
Recherche
Haut
Forum
Visual Basic
Sujet Précédent
Sujet Suivant
Tester si un nombre est entier ?
Résolu
typhoon_74
Messages postés
66
Date d'inscription
jeudi 11 mars 2004
Statut
Membre
Dernière intervention
11 février 2007
- 21 janv. 2006 à 09:37
ucfoutu
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
-
12 févr. 2015 à 11:18
Bonjour ,
J'ai essayé ce code dans mon programme pour tester si mon nombre était entier mais cela ne marche pas ... Le voici :
If A <> Int(A) then
Msgbox ("Veuillez entrer un nombre entier")
Exit sub
End If
Pouvez vous m'aider ?
Afficher la suite
A voir également:
Tester si un nombre est entier python
Vérifier si un nombre est entier python
- Meilleures réponses
Entier vba
- Meilleures réponses
Tester si un nombre reel est entier
✓
-
Forum Delphi / Pascal
Modulo pour tester si entier divisible par un chiffre
✓
-
Forum PHP
Déterminer si un nombre est un entier
-
Forum C# / .NET
Python arrondir à l'entier
✓
-
Forum Flash
Arrondi entier Superieur
✓
-
Forum C# / .NET
2
réponses
Réponse 1 / 2
cs_DARKSIDIOUS
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Membre
Dernière intervention
4 mars 2013
129
21 janv. 2006 à 09:43
Essaye ceci :
If Not IsNumeric(A) Then
MsgBox ("Veuillez entrer un nombre entier")
Exit Sub
End If
If A <> CInt(A) Then
MsgBox ("Veuillez entrer un nombre entier")
Exit Sub
End If
_____________________________________________________________________
adakhum
12 févr. 2015 à 09:44
Encore mieux :)
If A <> CInt(A) Then
A = Int(A)
End If
ce qui convertit directement le nombre en entier à la saisie :)
ucfoutu
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
219
Modifié par ucfoutu le 12/02/2015 à 11:25
Bonjour,
un
numérique
toto est entier si Fix(toto) = toto
Il y a une différence importante entre Int et Fix
Preuve du piège à éviter :
toto = -23.12
MsgBox Fix(toto) & vbCrLf & Int(toto)
Réponse 2 / 2
typhoon_74
Messages postés
66
Date d'inscription
jeudi 11 mars 2004
Statut
Membre
Dernière intervention
11 février 2007
21 janv. 2006 à 09:53
Merci beaucoup le premier marche très bien ;)
Afficher toute la discussion
Discussions similaires
savoir si un nombre est entier
cs_bernic
-
27 déc. 2002 à 11:02
jcecchi
-
27 déc. 2002 à 14:46
Compteurs de voyelles
micoo86
-
2 avril 2006 à 19:10
micoo86
-
2 avril 2006 à 22:43
inverser les chiffre d'un entier
whitehat21
-
5 oct. 2010 à 10:28
whitehat21
-
7 oct. 2010 à 18:43
nombre de diviseurs d'un nombre entiers [URGENT]
Jessicah
-
3 nov. 2017 à 14:27
NHenry
-
3 nov. 2017 à 21:10
Arrondir un chiffre a l'entier superieur??
py2lyon
-
1 mars 2005 à 18:23
py2lyon
-
1 mars 2005 à 22:08
Arrondi entier Superieur
maxdesu
-
12 juin 2008 à 12:05
maxdesu
-
12 juin 2008 à 14:03
Rejoignez-nous
Les tops du mois
Swing - Partie 2 : ActionListener, Listener, JButton
Affichage en tableau : afficher des données dans un tableau
Rendre le javascript dynamique par apport à une base de données
La commande "shutdown"
Exemple de création d'un script d'authentification
12 févr. 2015 à 09:44
If A <> CInt(A) Then
A = Int(A)
End If
ce qui convertit directement le nombre en entier à la saisie :)
Modifié par ucfoutu le 12/02/2015 à 11:25
un numérique toto est entier si Fix(toto) = toto
Il y a une différence importante entre Int et Fix
Preuve du piège à éviter :