特殊管理药品包括:VB代码问题

来源：百度文库 编辑：查人人中国名人网 时间：2024/05/12 05:09:18
星号，是菱形排列的。就是第一行一个，第二行俩，第三行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

VB代码的问题 VB代码问题 VB编程代码问题 VB编程代码问题 VB编程代码问题 VB编程代码问题 VB编程代码问题 vb代码问题 vb代码问题 vb代码问题