VBA Function

練習

1. 讓使用者可以用下形式計算bmi, 體重(kg)/身高(m square)

• e.g. bmi(60, 1.7)

2. 讓使用者可以用下形式計算身金

• salary(3000, 5000, 0.05, 30)
• 3000: 底薪
• 5000: 銷售產品的價格
• 0.05: 佣金
• 30: 賣出的產品數目

3. 讓使用者可以用下形式轉換體重

• pound2kg(220)

4. 重用 3. & 1. ，讓使用者可以用下形式使用

• bmiInPound(150, 1.7)
• 150: pound
• 1.7: meter

答案

Function bmi(massKg, heightM)
bmi = massKg / heightM ^ 2
End Function

Function salary(base, price, cRate, quantity)
salary = base + price * cRate * quantity
End Function

Function pound2kg(massPound)
pound2kg = massPound * 2.2
End Function

Function bmiInPound(massPound, heightM)
bmiInPound = bmi(pound2kg(massPound), heightM)
End Function