begin process at 2010 02 10 13:38:20
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Divers

 > CALCUL DE L'INDICE DE MASSE CORPORELLE (BMI)

CALCUL DE L'INDICE DE MASSE CORPORELLE (BMI)


 Information sur la source

Note :
10 / 10 - par 1 personne
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Divers Classé sous :masse corporelle, calcul, variable, gestion erreur, BMI Niveau :Débutant Date de création :12/01/2008 Date de mise à jour :12/01/2008 19:19:12 Vu / téléchargé :9 522 / 426
Auteur : robapt

Ecrire un message privé
Site perso
Commentaire sur cette source (11)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
Bon ben comme vous pouvez le voir, le titre en dis assez!
Ceci est très débutant mais c'est mon premier code (je mis suis remis alors que je n'y avait pas retouché pendant 2 ans ... donc soyez sympa! ^^)
Pour les débutant (encore plus que moi lol), il y a la gestion des erreurs au cas par cas puis du stockage de valeurs dans une variable.
Voila ! Merci à tous!



 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

12 janvier 2008 19:11:23 :
Mis à jour pour les erreurs qui précisées pas assez ... ^_^ 'Merci aux membres pour leurs commentaires
12 janvier 2008 19:12:52 :
Modification de la gestion des erreur 'Merci au membre pour leurs commentaires!
12 janvier 2008 19:13:16 :
Modification de la gestion des erreur 'Merci au membre pour leurs commentaires!
12 janvier 2008 19:19:12 :
Ajout de 'Option Explicit' dans le code ... lol

 Sources du même auteur

Source avec Zip Source avec une capture PETIT EXEMPLE DE CHAT AVEC WINSOCK
Source avec Zip Source avec une capture CONNECTIONS CLIENT-SERVEUR VIA WINSOCK
Toutes les sources de robapt

 Sources de la même categorie

Source avec Zip Source avec une capture Source .NET (Dotnet) SPACE - UN SPACE MAC POUR WINDOWS par vbnino
Source avec Zip Source .NET (Dotnet) MULTI THREAD AVEC AFFICHAGE par jaknight007
Source avec Zip Source .NET (Dotnet) COMPILATEUR EN VB NET 2003 par alpha5
Source avec Zip Source avec une capture CRYPTER AVEC LE CHIFFRE DES NIHILISTES RUSSES par tresorsdevie
Source avec Zip Source avec une capture Source .NET (Dotnet) COMPTE_BANCAIRE.NET par Adn56
Toutes les sources de la catégorie Divers

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture CALCULE HEURES DE NUIT 2 par ocejade
Source .NET (Dotnet) OBTENIR L'HEURE DE DÉMARRAGE D'UN PC DISTANT EN SE CONNECTAN... par monpcmenerve
BON CALCUL D'UN NOMBRE NEGATIF AVEC UN EXPOSANT FRACTIONNAIR... par us_30
Source avec Zip CALCULS SUR DE GRANDS NOMBRES (PLUSIEURS MILLIERS DE CHIFFRE... par apexinfo
Source avec Zip Source avec une capture CALCULATEUR DE RÉSISTANCE par VBsearch

Commentaires et avis

Commentaire de econs le 12/01/2008 18:44:49 administrateur CS

Salut,

Précision : il s'agit de l'indice de masse corporelle, et pas de la masse corporelle.

Et concernant ta seule ligne de code :
bmi = poids.Text / (taille.Text * taille.Text)

Ben, heureusement que VB6 n'est pas très regardant sur le typage, parce que dans n'importe quel autre langage, ce truc-là ne compile pas.

D'ailleurs, si je rentre "azerty" pour ma taille, que se passe t-il ?

Commentaire de robapt le 12/01/2008 19:06:51

Ha ouai mince ! ^^ J'ai oublié ce type d'erreur j'y est pensé aux début mais j'ai oublié quand j'ai trouvé le code pour le cas par cas dans les erreur ! merci pour l'info, je modifie sa tout de suite ! ;)

Commentaire de econs le 12/01/2008 19:12:08 administrateur CS

Et tapes "Option Explicit" en haut de ta page de code.
VB détectera tout seul d'autres erreurs. :o)

Commentaire de robapt le 12/01/2008 19:21:02

Merci à toi ECONS, admin, pour ce bout de code, je m'était souvent demandé à quoi pouvais servir se code sans pour autant rechercher à quoi il pouvait servir ! Mais c'est vrai que c'est important et plus pratique avec sa ! ^^
Merci, merci et encore merci !

Commentaire de econs le 12/01/2008 19:25:11 administrateur CS

Bah oui, ne pas déclarer le type de ses variables est un très mauvais départ dans le monde de la programmation. Merci 'Option Explicit" !

Commentaire de EBArtSoft le 13/01/2008 10:07:09 administrateur CS

Ca devrait être interdit tout comme les calculettes et les convertisseur euro/francs !

Commentaire de us_30 le 13/01/2008 10:50:11

Bonjour,

Personnellement, je met un 10 pour l'idée, et un 10 pour l'encouragement...

Pour le code, c'est sur que c'est pas très propre... je te propose cette alternative à regarder :

=

Option Explicit
Private Sub Command1_Click()

'Déclaration variables
Dim Tail As Double
Dim Poid As Double
Dim Indice As Double

'Conversion TextBox en Valeur
Tail = Val(Replace(taille.Text, ",", "."))
Poid = Val(Replace(poids.Text, ",", "."))

'Calcul de l'indice
Indice = Poid / (Tail ^ 2)

'Renvoi
MsgBox "Votre indice de masse corporelle est de : " & Round(Indice, 2)

End Sub

=

Bon courage,

Amicalement,
Us.

Commentaire de us_30 le 13/01/2008 10:51:12 10/10

oupsss... j'ai oublié la note...

Us.

Commentaire de EBArtSoft le 13/01/2008 12:01:21 administrateur CS

US_30> Pour l'encouragement ok mais pour l'idée ?!?

C'est clair qu'elle est carrement trop originale haha. Je tape "corporelle" dans la case "rechercher" et hop 6 codes identique...

http://www.vbfrance.com/recherche.aspx?r=corporelle

Commentaire de us_30 le 13/01/2008 16:25:59

Salut,

J'vais polémiquer. Y'a en que 5 sur VBF... dont 1 inacessible ?!...
A savoir, un le :
- 23/04/2007 en VB.NET (du coup, il ne compte pas !)
- 03/02/2005 en VB6 mais marche pôs... (donc compte pas!)
- 26/06/2003 VB6 ... bon ok.
- 01/11/2002 VB6 mais marche pôs non plus... (donc compte pas!)
au vu des dates, 2002, 2003... trop vieux, donc compte plôus...

donc comme il n'y en a pas franchement moins que les calculatrices, je ne les avais jamais vu... donc en avoir une fois de temps en temps... alors, m'ouais, c'est une idée presque originale... D'ailleurs, si on prend le délai entre deux dates pour la taille, et le nombre d'Octet de la source pour le poids, et qu'on fait le rapport Poids/taille^2, et si "l'indice de masse de code identique" est entre 20 et 25, alors VBF se trouve dans la zone idéale... non ? j'y peut rien c'est médicale ! Ici, 9506/ ((12/01/2008)-(23/04/2007))^2 = 9506/264^2 = 0.13 !! c'est franchement maigrichon !!

Amicalement,
Us.

Commentaire de us_30 le 13/01/2008 16:29:39

"l'Indice de Masse de Code" => IMC ! comme Indice de Masse Coporelle... j'invente rien...

Us.

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

calcul avec une date [ par laurent92370 ] bonjourmon problème :dans une variable LADATE, de type long, je récupère la date au format 26012005 par exemple.puis, dans une variable Problème calcul [ par Nesta ] Bonjour,J'ai réalisé un prog qui trace des courbes et qui calcul son mini., son maxi., et sa déviation qui elle me pose problème.Pour sa j'ai pompé la variable Currency insufisante [ par Cracker ] Je dois faire un calcul avec un nombre supérieur a la limite autorisé par les variables Curerncy !!C a d ke mon nombre est supérieur à 922 337 203 685 Passage d'une variable d'une macro vers une feuille de calcul [ par Tity333 ] Bonjour, à tous,Je cherche depuis quelque temps à utiliser une variable définie selon les choix d'un set d'OptionButton directement dans mes formules Problème de macro - calcul en fonction d'une variable [ par FlyingAlex ] Amis du jour bonjour!Alors tout d'abord j'ai un petit souci.J'ai créé sous Excel une combobox qui prend des valeurs suivant une liste dans une autre f calcul d'une variable [ par draluorg ] Salut a tous,est il possible de calculer une variable ?exemple si ma variable renvoi 8 + 2 * 3 -4merci pour vos reponses @+Quand o pose une question o variable [ par evildido ] Salut à tous. Pardonner moi à l'avance pour cette question peut paraitre un peu bête mais mon niveau en c++ étant déplorable, Interruption logicielle & variable public [ par salazar ] Lorsque je veux lire une variable déclarée en public, quand je génère une interruption logicielle avec SetWindowLong/CallWindowPro Lancement d'application [ par t0ine ] Bonjour, je travaille avec vb 2008.Je voudrai  récupérer dans une variable booléenne le fait d'avoir lancer mon application via l'exe( Variable à fals Guide de conception et de calcul des silos industriels [ par siemenschkl ] je besoin de livre Guide de conception et de calcul des silos industriels


Nos sponsors


Sondage...

Comparez les prix


HTC Magic
Entre 429€ et 429€

Visiter le guide achat

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,764 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)