印表時,數據無法對齊,format 格式(編號：882)

程式如下:
------------------------------
For k = 1 To 31
　　 Printer.CurrentX = 6
　　 Printer.Print Format(k, "###")
　　 Printer.CurrentX = 18
　　 Printer.Print Format(A(k), "###,###,###,###");
　　 Printer.CurrentX = 37
　　 Printer.Print Format(B(k), "###,###,###,###");
NEXT K
------------------------------------
執行結果:
　　　　1　　　　 X,XXX　　　　　　　　XXX
　　　　2　　　　 X,XXX　　　　　　　　X,XXX
　　　　3　　　　 XX,XXX　　　　　　　 XX,XXXX

請問如何使數值向右對齊?
　　　　　　　　　　　 Printer.Print Format(C(k), "###,###,###,###")
　　　　　　　　　　Else
　　　　　　　　　　　 Printer.Print Format(0, "###,###,###,###")
　　　　　　　　　　End If
　　　　　 Printer.CurrentX = 5
　　　　　 Printer.Print "－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－"
　　　Next k