VB怎么用循环语句和*打印等腰三角形**** * * * * * * 像这样!等腰的!

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/07 12:12:32
VB怎么用循环语句和*打印等腰三角形**** * * * * * * 像这样!等腰的!

VB怎么用循环语句和*打印等腰三角形**** * * * * * * 像这样!等腰的!
VB怎么用循环语句和*打印等腰三角形**** * * * * * * 像这样!等腰的!

VB怎么用循环语句和*打印等腰三角形**** * * * * * * 像这样!等腰的!
新建工程,添加command1控件,复制我的代码.vb6.0+xp调试通过.
代码如下
Private Sub Command1_Click()
Dim i As Integer
Print Space(10) & "*"
For i = 1 To 9
Print Space(10 - i) & "*" & Space(i * 2) & "*"

Next i
For i = 0 To 21
Print "*";
Next i
End Sub