Body Mass Index ( BMI ) ger enskilda personer och läkare med en guide för fetma . BMI beräknas avgör om en person har en hög andel fett kontra längd och vikt . Ett högt BMI visar en person närmar sig fetma , vilket kan leda till mer allvarliga hälsotillstånd som diabetes , hjärtsjukdomar och andningsproblem . En programmerare kan beräkna BMI med hjälp av Visual Basic (VB ) . Beräkningen sker med hjälp av BMI algoritm och VB syntaxen
1 .
Skapa Visual Basic variabler . Dessa variabler innehåller det ursprungliga längd och beräkningar vikt . En tredje variabel är skapad för att innehålla BMI värde . Följande kod skapar VB variabler för beräkningarna :
Dim höjd som decimaltal
Dim vikt som decimaltal
Dim BMI As Integer
2
Konvertera . vikt från pounds till kilo . Kg är en standard enhet för vetenskapliga beräkningar . Vikten i pounds omvandlas genom multiplikation med 703 . I detta exempel en person som är 150 pounds och 5 fot 6 inches utvärderas . Följande omsätter vikten och sparar den i höjden variabel :
vikt=150 * 703
3
Beräkna höjden . Höjden är konverteras först till inches . Efter det omvandlas till total inches , är vikten delat med höjden två gånger . Följande är hur man beräknar höjden för den slutliga BMI beräkning ( apostrof betecknar kod kommentarer ) :
höjd=5 * 12 + 6 " ( multiplicera 12 gånger fötterna och tillsätt resten av inches )
höjd=Vikt /(5 * 12 + 6)
höjd=höjd (5 * 12 + 6)
4 .
Tilldela BMI värde för variabeln , och skicka ett meddelande till programvaran användaren . Höjden värde är det decimala värdet av BMI . Höjd omvandlas till ett heltal , och tilldelas till BMI variabeln . Följande slutför beräkningen :
BMI=Convert. ToInteger ( höjd )
MsgBox " BMI är " BMI
Previous:nothing Next:hur man läser xls -filer i java