编程论坛 » VB.NET论坛 » 帮我解释一下

lbyjin 发表于 2008-1-8 13:51

帮我解释一下

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
        textbox1.Text = c

查看完整版本: 帮我解释一下