如何用VB.Net实现格式化编号为货币格式?