Hogyan tudnám VBS programban a következő algoritmust (leírásban van) egy MsgBox al megcsinálni?

Azt szeretném kiiratni, hogy: Az BMI-e (változó1), tehát ön (változó2)

m=InputBox("Az ön súlya kg-ban")

mag=InputBox("Az ön magassága centiméterben")

BMI=m/((mag*mag)/10000)

If BMI<25 Then

MsgBox("Ön normál testalkatú, a BMI értéke: ")&( BMI)

End If

If BMI>=25 Then

MsgBox("Ön túlsúlyos, a BMI értéke: ")&( BMI)

End If

If BMI>30 Then

MsgBox("Ön egy kövér, a BMI értéke: ")&( BMI)

End If