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
Commentaires sur une source
Sujet Précédent
Sujet Suivant
UN GAGNANT AU HASARD
NHenry
Messages postés
15102
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
27 mars 2024
- 13 nov. 2011 à 00:28
Renfield
Messages postés
17287
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
-
14 nov. 2011 à 08:05
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/53758-un-gagnant-au-hasard
Renfield
Messages postés
17287
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
74
14 nov. 2011 à 08:05
rapport au CInt mentionné par NHenry, préfères lui Val...
NHenry
Messages postés
15102
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
27 mars 2024
159
13 nov. 2011 à 00:28
Bonsoir,
Ta source est très simpliste, mais :
- Chr$(13) & Chr$(10) peut se remplacer par VbCrLf
- l = CInt(Text2.Text) Et si Text2.Text="jsdlfjklsr" ?
En général, en VB6, les types numériques entier, on préfère Long à Integer, car ce dernier est en 16 bits seulement.
Penses aussi à nommer tes controles de manière ligique :
TxtPari est plus parlant que Text2.
Je rappelle que pour les "petites" sources, il y a www.codyx.org.
Votre réponse
Discussions similaires
generer chiffres au hasard sur VB6
bionat
-
4 août 2003 à 16:49
Janseverus
-
4 août 2003 à 17:09
Récupération d'un mot aléatoire depuis un fichier texte
mornaloce
-
18 nov. 2010 à 16:51
buno
-
28 déc. 2010 à 09:30
Générer aléatoirement des lettres
amlev11
-
6 mars 2007 à 19:55
Ombitious_Developper
-
7 mars 2007 à 01:22
Script instant gagnant
webide
-
24 janv. 2009 à 11:40
webide
-
27 janv. 2009 à 07:02
lettre aléatoire
Thanos_the_yopper
-
3 juin 2004 à 18:15
Thanos_the_yopper
-
4 juin 2004 à 10:11
Rejoignez-nous
A voir également
Roulette hasard personnalisé
Tirer aleatoirement un caractere dans l'alphabet
Lettre au hasard roulette
Roue du hasard
Roue du hasard personnalisable
14 nov. 2011 à 08:05
13 nov. 2011 à 00:28
Ta source est très simpliste, mais :
- Chr$(13) & Chr$(10) peut se remplacer par VbCrLf
- l = CInt(Text2.Text) Et si Text2.Text="jsdlfjklsr" ?
En général, en VB6, les types numériques entier, on préfère Long à Integer, car ce dernier est en 16 bits seulement.
Penses aussi à nommer tes controles de manière ligique :
TxtPari est plus parlant que Text2.
Je rappelle que pour les "petites" sources, il y a www.codyx.org.