Création d'un calculateur d'IMC qui permettra d'afficher votre indice de masse corporelle sur votre ordinateur plutôt que d'avoir à utiliser une version en ligne ou faire le calcul à la main nécessite un minimum de connaissances de la programmation et de l'accès au logiciel de programmation, tels que Visual Basic, Visual Basic.Net ou un langage plus compliqué. Pour l'utilisateur profane, la libre Microsoft Visual Basic Express est une façon de créer cette calculatrice.
Ouvrez Visual Basic Express, cliquez sur "Nouveau projet," sélectionner "Application Windows" comme le type, le nommer "BMI Calculator" et cliquez sur "D'ACCORD." Modifiez la propriété du texte de la forme dans le panneau Propriétés en bas à droite de l'écran pour "BMI Calculator."
Créez deux étiquettes sur le formulaire qui apparaît en double-cliquant sur l'outil d'étiquette dans la boîte à outils sur la gauche, identifié avec un grand "Un" et puis en répétant ce processus. Cliquez et faites glisser chaque étiquette maintenant sur le formulaire de sorte que l'on semble sous l'autre.
Créer deux zones de texte de la même manière, cette fois en double-cliquant sur le "Zone De Texte" outil. Placez une case à côté de chaque étiquette. Créer un bouton de commande en double-cliquant sur le "Bouton" outil et placez-le ci-dessous les étiquettes.
Créer une troisième étiquette comme dans l'étape 2 et de localiser à côté du bouton de commande. Définissez la taille des deux premières étiquettes dans le panneau Propriétés sur la droite de l'écran en utilisant une largeur de 180 et une hauteur de 25. Gardez la troisième étiquette la même hauteur, mais assurez la largeur 150.
Modifier la propriété texte de l'étiquette supérieure à lire "Entrez votre poids en livres" et la propriété de texte de la deuxième étiquette à lire "Entrez votre taille en pouces." Supprimer le texte pour la troisième étiquette et assurez le nom "BMIResult." Modifiez la propriété de texte du bouton de commande pour lire "Calculer."
Double-cliquez sur le "Calculer" bouton pour ouvrir la fenêtre de code et entrez le code suivant entre le "Sous privée" et "End sub" lignes:
Dim IMC Comme Simple
Hauteur Dim Comme court
Dim Poids Comme court
Hauteur = CShort (Text2.Text)
Poids = CShort (Text1.Text)
IMC = (poids / (Height_Renamed Height_Renamed)) 703
IMC = CSng (IMC)
BMIResult.Text = "Votre IMC est " & BMI.ToString ("F1")
Testez le programme en appuyant sur "F5" sur les touches de fonction. Le résultat devrait apparaître dans l'espace à côté de "Calculer." Si elle le fait, appuyez sur "CTRL + S" sauver. Si non, revenir en arrière et vérifier le codage et les noms des étiquettes. Puis cliquez sur "Construire." Epingler le fichier EXE résultant dans le menu Démarrer ou le copier dans le bureau.