输出一个５行的左下三角形

jinlby 发布于 2008-01-03 15:22， 1181 次点击

用编写出
1
12
123
1234
12345

1 回复

wzywing2008-01-03 17:34

Dim a As Integer
        Dim b As String = "12345"
        Dim c As String = ""
        For a = 1 To 5
            c = c & b.Substring(0, a) & vbCrLf
        Next
        txt.Text = c