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

多媒體檔案格式轉換 - 如MP4 Video to MP3 Audio

最近有位朋友詢問有否簡單易用的軟件，把視視檔轉成聲音檔，擺進iphone裡。典型的例子是把演講的視像mp4 video 轉成 mp3 audio，省下iphone不少的儲存空間。

在Windows 7裡，我試了WinFF (1.1.0 Aug 28, 2009) 及Super(2010 Build 37 Jan 01, 2010) ，只有後者能在Windows 7裡完成任務。

操作簡易，Right click Mouse有Menu各種選項。

1. 從Menu中Add Multimedia Files(s)
2. 在程式頂部左邊，選MP3 (Audio Only)，頂部右邊mp3。
3. 在底部按"Enocde (Active Fiels)" Button。
4. 轉換了的mp3預設在來源檔的相同資料夾中。