vb程序設(shè)計(jì)打印數(shù)字金字塔？代碼和注釋如下：private sub command1 Click（）對(duì)于I=1到9“I loop from 1 to 9對(duì)于J=1 to 9-I”J loop from

vb程序設(shè)計(jì)打印數(shù)字金字塔？

代碼和注釋如下：

private sub command1 Click（）

對(duì)于I=1到9“I loop from 1 to 9

對(duì)于J=1 to 9-I”J loop from 1 to 9-I，其中J生成空格

print“”show spaces

next J

對(duì)于J=1 to I“J loop from 1 to 9，其中j生成1-9個(gè)數(shù)

print j“show j

next j

對(duì)于j=I-1到1 step-1”j循環(huán)從9-1開始，其中j生成鏡像數(shù)

print j“show j

next j]]print”對(duì)于分支，我為每一行更改一行

next I

End Sub