O Índice de Massa Corporal (IMC) fornece a indivíduos e médicos com um guia para a obesidade. O cálculo do IMC determina se uma pessoa tem uma alta proporção de gordura em relação peso e altura. Um IMC elevado indica uma pessoa está se aproximando a obesidade, que pode levar a mais graves problemas de saúde como diabetes , doenças cardíacas e problemas respiratórios. Um programador pode calcular o IMC usando o Visual Basic (VB) . O cálculo é feito usando o algoritmo de IMC e sintaxe VB . Instruções
1
Criar as variáveis do Visual Basic . Estas variáveis segurar a altura inicial e cálculos de peso . A terceira variável é criada para conter o valor do IMC. O código a seguir cria variáveis VB para os cálculos : altura Dim peso DecimalDim Como DecimalDim IMC As Integer
2
Converter o peso de libras em quilogramas. Quilogramas é uma unidade padrão para cálculos científicos . O peso em libras é convertido ao multiplicá-la com 703 . Neste exemplo, uma pessoa que é de 150 libras e 5 pés 6 polegadas é avaliada. A seguir converte o peso e salva -lo para a variável altura: peso = 150 * 703
3
Calcular a altura . A altura é primeiro convertido em polegadas . Depois de ser convertido para o total de centímetros , o peso é dividida por duas vezes a altura . O seguinte é como calcular a altura para o cálculo final IMC ( o apóstrofo denota comentários de código ): Altura = 5 * 12 + 6 '( multiplicam 12 vezes os pés e adicionar os centímetros restantes) height = peso /(5 * 12 + 6) height = altura (5 * 12 + 6)
4
Atribuir o valor de IMC para a variável , e enviar uma mensagem para o usuário do software . O valor da altura é o valor decimal do IMC . A altura é convertido para um número inteiro , e atribuído a variável IMC . A seguir, finaliza o cálculo : IMC = Convert.ToInteger (altura) MsgBox " O IMC é" & IMC