The Body Mass Index ( BMI ) erbjuder privatpersoner och läkare med en guide för fetma . Den BMI avgör om en person har en hög andel fett kontra längd och vikt . Ett högt BMI indikerar en person närmar 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 görs med hjälp av BMI -algoritmen och VB syntax . Instruktioner
1
Skapa Visual Basic variabler . Dessa variabler håller den inledande höjden och beräkningar vikt . En tredje variabel skapas för att innehålla BMI värde . Följande kod skapar VB variabler för beräkningarna : Dim höjd som DecimalDim vikt Som DecimalDim BMI As Integer
2
Konvertera tyngden från pounds till kilo . Kilogram är en standard enhet för vetenskapliga beräkningar . Vikten i pounds omvandlas genom att multiplicera den med 703 . I detta exempel är en person som är 150 pounds och 5 fot 6 inches utvärderas . Följande omvandlar vikt och sparar den till höjden variabeln : vikt = 150 * 703
3
Beräkna höjden . Höjden omvandlas först till inches. Efter det konverteras till totala inches , är vikt dividerad med höjden två gånger. Följande är hur man kan beräkna höjden för den slutliga BMI ( apostrofen betecknar koden kommentarer ) : höjd = 5 * 12 + 6 ' ( multiplicera 12 gånger fötterna och lägg de återstående inches ) höjd = vikt /( 5 * 12 + 6 ) height = höjd ( 5 * 12 + 6 )
4
Tilldela BMI värde till variabeln , och skicka ett meddelande till programvaran användaren . Höjden värdet är det decimala värdet av BMI. Höjd omvandlas till ett heltal , och tilldelas BMI variabeln . Följande slutför beräkningen : BMI = Convert.ToInteger ( höjd) MsgBox " BMI är " & BMI
