作业帮 > 综合 > 作业

VB数字倒金字塔程序 输入1-9之间的数字,形成以下倒金字塔

来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/05/28 17:11:49
VB数字倒金字塔程序 输入1-9之间的数字,形成以下倒金字塔
7777777777777
66666666666
555555555
4444444
33333
222
1
VB数字倒金字塔程序 输入1-9之间的数字,形成以下倒金字塔
Private Sub Command1_Click()
Dim i,j As Integer
For i = 1 To 13
For j = 1 To i
Print " ";
Next j
For j = i To 13 - i + 1
Print Chr(56 - i);
Next
Print
Next i
End Sub
VB 测试通过!