FIT   100
© Copyright University of Washington 1999-2000
Body Mass Computation
vThe body mass index is used to determine if a person is overweight:
o BMI = 4.89weight/height2
owhere the weight is in pounds, the height is in feet
o
vConverting it to a procedure is straightforward … so volunteer to write it, letting your friend build the GUI
Option Explicit
Dim weightLBS As Double
Dim heightIN As Double
Dim bodyMass As Double
Private Sub BMI()
    bodyMass = 4.89 * weightLBS / (heightIN/12)^2
End Sub