VB題：在窗體中顯示如下團案（數字金字塔）

Const?n?=?10

Private?Sub?Form_Click()

Dim?i,?j?As?Integer

For?i?=?1?To?n

For?j?=?0?To?n?-?i

Print?"?";

Next?j

For?j?=?1?To?i

Print?i;

Next?j

Print?vbCrLf

Next?i

End?Sub