哥哥们快救救小女子

[xiaohuamaomimi]

编程实现：
*
**
***
...
**********
要求可以输入一个n

[贝隆]

dim n as integer
For i=1 to n
Print "*" & vbcrlf
next i

[threenewbee]

dim n as long
n = val(inputbox("输入n:", "5"))
for i = 1 to n
    print string("*", i)
next

[xiaohuamaomimi]

[Quote=引用 1 楼 veron_04 的回复:]
dim n as integer
For i=1 to n
Print "*" & vbcrlf
next i
[/Quote]
这个只能显示1排。。。555

[xiaohuamaomimi]

[Quote=引用 2 楼 caozhy 的回复:]
VB code
dim n as long
n = val(inputbox("输入n:", "5"))
for i = 1 to n
print string("*", i)
next
[/Quote]
这个不错，n = val(inputbox("输入n:", "标题"))这样更好~！
哈哈，老师验收通过了！！！

[dazhi518]

帮顶...........