IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

Un long trop petit


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé Avatar de SweetLeaf
    Profil pro
    Inscrit en
    Juillet 2008
    Messages
    151
    Détails du profil
    Informations personnelles :
    Âge : 36
    Localisation : France, Nord (Nord Pas de Calais)

    Informations forums :
    Inscription : Juillet 2008
    Messages : 151
    Par défaut Un long trop petit
    Bonjour !

    Je suis en train de créer un programme qui fait pas mal de calculs dont des multiplications.

    Dans le pire des cas le résultat final est de :
    100*100*75*75*50*50= 140 625 000 000.

    Je stocke ce résultat dans des variables de type 'Long' mais ce n'est pas suffisant. Existe-il un type plus grand que Long ?

    Si vous avez une idée merci de partager ^^
    Bonne journée à tous !

  2. #2
    Membre Expert Avatar de OhMonBato
    Homme Profil pro
    Inscrit en
    Mars 2007
    Messages
    2 660
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Morbihan (Bretagne)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Mars 2007
    Messages : 2 660
    Par défaut
    Bonjour,

    je pense que comme ca, ca devrait faire l'affaire :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    Private Sub Command1_Click()
    Dim i As Currency
    i = Val(Text1.Text) * Val(Text2.Text) * Val(Text3.Text) * Val(Text4.Text) * Val(Text5.Text) * Val(Text6.Text)
    'i = 100# * 100# * 75# * 75# * 50# * 50#
    Debug.Print i
    End Sub

  3. #3
    Membre confirmé Avatar de SweetLeaf
    Profil pro
    Inscrit en
    Juillet 2008
    Messages
    151
    Détails du profil
    Informations personnelles :
    Âge : 36
    Localisation : France, Nord (Nord Pas de Calais)

    Informations forums :
    Inscription : Juillet 2008
    Messages : 151
    Par défaut
    J'ai résolu le problème.
    En fait je faisais la multiplication entre deux variables déclarées en Integer puis je stockai le résultat dans une variable déclaré en Long. Mais VB fait un calcul intermédiaire en stockant le résultat dans une variable fictive du même type que les deux variable de départ. Il fallait donc juste déclaré les variables de départ en Long. Merci quand même !

  4. #4
    Membre Expert Avatar de OhMonBato
    Homme Profil pro
    Inscrit en
    Mars 2007
    Messages
    2 660
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Morbihan (Bretagne)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Mars 2007
    Messages : 2 660
    Par défaut
    Ca m'etonnerait que la multiplication que tu donnes en exemple marche avec des long.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [D7][Access]Le champ est trop petit
    Par dleu dans le forum Bases de données
    Réponses: 3
    Dernier message: 31/01/2007, 18h49
  2. "Champ trop petit pour quantité de données"
    Par Miss Ti dans le forum Access
    Réponses: 9
    Dernier message: 25/07/2006, 20h56
  3. Réponses: 3
    Dernier message: 14/04/2006, 12h54
  4. [FORMS 6.0 ] fenetre d'alerte trop petite
    Par sdiack dans le forum Oracle
    Réponses: 1
    Dernier message: 27/01/2006, 07h34
  5. Polices trop petites dans les applications X
    Par YéTeeh dans le forum Applications et environnements graphiques
    Réponses: 7
    Dernier message: 30/08/2005, 15h32

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo