神雕侠侣下载电视剧:VB代码问题

来源:百度文库 编辑:中科新闻网 时间:2024/05/13 07:56:26
星号,是菱形排列的。就是第一行一个,第二行俩,第三行3,第四行俩,第五行一个,每行星号间都有空格,明白了吧?
小弟初学者,高人指点
FOR循环
谢谢

Dim N As Integer, i As Long
N = 5
For i = 1 To 2 * N - 1
Print String$(IIf(i <= 3, i, 2 * N - i), "*") & " "
Next