在Access中將阿拉伯數字金額轉換成漢字大寫金額的問題？

用VBA寫一段循環(select case…)轉換語句，用“0 1 2…9”對應大寫的“零 壹 貳…玖”，用字符函數分別從：小寫的阿拉伯數字后王前取數字字符，每取一個數字，轉換成對應的大寫字符（加上分，角，元…），轉換出的字符用&連接到一字符串中，直到結束（小數點不用轉換），最后得到的字符串就是轉換后的大寫金額。