用VB编程如何打印数字金字塔

用VB编程如何打印数字金字塔，如下所示：

    1
  121
12321
...........

For   i   =   1   To   9   
  For   j   =   1   To   9   -   i   
  Print   "       ";   
  Next   j   
  For   j   =   1   To   i   
  Print   j;   
  Next   j   
  For   j   =   i   -   1   To   1   Step   -1   
  Print   j;   
  Next   j   
  Print   
  Next   i