请问纯数字的右对齐打印方法

请教纯数字的右对齐打印方法
输出纯数字（含小数点），要求右对齐，请问如何处理？

样例：
1234.50
  234.50
    62.50

[解决办法]
dim str as string
str=space(50)
str=str & right(str & "1312.13 ",10)