vb数字金字塔1 121 12321一直到9

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/21 14:14:53

vb数字金字塔1 121 12321一直到9
For i = 1 To 9
For j = 1 To i
Print j;
Next j
For j = i - 1 To 1 Step -1
Print j;
Next j
Print这个代码怎么改能变如图
Next i

自己看图,是不是这样,我发了两个小时才调好的,我也才学,代码如下：
Private Sub Form_Click()
Dim a(1 To 5) As Integer
  For j = 1 To 5
  a(j) = j
  Next j
For i = 1 To 5
Print Tab(30 - i * 3);
  For j = 1 To 2 * i - 1
  If j > i Then
   Print a(2 * i - j);
  Else
  Print a(j);
  End If
  Next j
Next i
End Sub

VB数字倒金字塔程序输入1-9之间的数字,形成以下倒金字塔 VB中数字金字塔样式为：1 121 12321 1234321 以此类推,请问这个程序该怎么设计 C语言,数字金字塔 ,形式是1 22 333 4444 55555 一直可以到9个9.可以控制输出的行数求VB代码_数字金字塔 vfp数字金字塔的程序 1 121 12321 求用VB程序解决~生成数字金字塔,要求一个等腰三角形金字塔尖朝下,另一个朝上,中间数字为1,向两个方向递推增加.最多到数数字金字塔12 23 3 34 4 4 4..一直到n ,n由我们输入!用C++编程! vB l中用 WHILE 来做 121 12321 1234321 金字塔求答!急要 ⑩以后一直到50带圈数字1 VB 从1到500所有自然数中不含数字4的自然数共有多少个 VB计算圆周率近似值 π/4=1-1/3+1/5+.+1/i一直到i VB怎样选连续选两个数字隔一个数字再连选两个数字,比如0到10,我选124578或是0,1,3,4,6,7,9,10