作者xtwo (平淡无奇)
看板Visual_Basic
标题[.NET] 请问一个回圈的问题
时间Sun Jan 24 19:00:27 2010
请输入专案类型(网站专案或者应用程式专案):
我想做类似下面这种图形
行1*
2
3 *
4**
5
6 *
7 **
8***
9
10 *
11 **
12 ***
13****
可是我跑出的结果却变成
行1 *
2
3 **
4
5 ***
6
7****
请高手们帮我看看我程式码哪边出问题了
感谢帮忙
以下是我原始程式码
Module Module1
Sub Main()
Dim j, i As Integer
j = 1
Do While j <= 4
i = 1
Do While i <= 4 - j
Console.Write(" ")
i += 1
Loop
i = 1
Do While i <= j
Console.Write("*")
i += 1
Loop
Console.WriteLine()
j += 1
Loop
End Sub
End Module
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.114.202.198
1F:→ Elly:不需要那个加空白的回圈,而且你加星号的回圈内要加一层回圈 01/24 22:59
2F:→ Elly:看错了,你还是有加空白,那你的空白和星号都要再加一层回圈 01/24 23:00
3F:→ Elly:不过说真的,我比较喜欢用补空白的指令,就不用回圈了 01/24 23:01
4F:→ Elly:字.PadLeft 01/24 23:05
5F:推 jwjeng:用For...Next和String会不会比较快一点? 01/24 23:05