L`indice de masse corporelle (IMC) fournit aux particuliers et aux médecins un guide pour l`obésité. Le calcul de l`IMC détermine si une personne a un taux élevé de matières grasses par rapport à la hauteur et le poids. Un IMC élevé indique une personne se rapproche de l`obésité, qui peut conduire à des conditions de santé plus graves telles que le diabète, les maladies cardiaques et des problèmes respiratoires. Un programmeur peut calculer l`IMC en utilisant Visual Basic (VB). Le calcul est effectué en utilisant l`algorithme IMC et la syntaxe VB.
Créer les variables Visual Basic. Ces variables contiennent les calculs de taille et de poids initiaux. Une troisième variable est créé pour contenir la valeur de l`IMC. Le code suivant crée des variables VB pour les calculs:
Hauteur Dim Comme Decimal
Dim poids Comme Decimal
Dim BMI As IntegerConvertir le poids de livres en kilogrammes. Kilogrammes est une unité standard pour les calculs scientifiques. Le poids en livres est converti en le multipliant par 703. Dans cet exemple, une personne qui est de 150 livres et 5 pieds 6 pouces est évaluée. Le texte suivant convertit le poids et l`enregistre dans la variable de la hauteur:
poids = 150 * 703Calculer la hauteur. La hauteur est d`abord converti en pouces. Une fois qu`il est converti en pouces au total, le poids est divisé deux fois par la hauteur. Voici comment calculer la hauteur pour le calcul de l`IMC final (l`apostrophe désigne des commentaires de code):
height = 5 12 + 6 `(multipliez 12 fois les pieds et ajouter les pouces restants)
height = poids / (5 12 + 6)
height = hauteur (5 * 12 + 6)Affecter la valeur de l`IMC à la variable, et envoyer un message à l`utilisateur du logiciel. La valeur de la hauteur est la valeur décimale de l`IMC. La hauteur est convertie en un nombre entier, et affecté à la variable de l`IMC. Ce qui suit finalise le calcul:
IMC = Convert.ToInteger (hauteur)
MsgBox "L`IMC est " & BMI
