Vb.net 列出数字

Vb.net 列出数字,vb.net,vb.net-2010,Vb.net,Vb.net 2010,我正在使用VB 2010 express。如何从文本框中的值创建列表框中的数字列表。例如,如果文本框是“15”,那么列表框将是“1”、“2”、“3”…“15”。我希望每个数字都位于列表框中自己的行上。 谢谢。您可以这样做: Private Sub PopulateList(sender As Object, e As EventArgs) Handles TextBox1.TextChanged Dim list As String() = New String(-1) {}

我正在使用VB 2010 express。如何从文本框中的值创建列表框中的数字列表。例如,如果文本框是“15”,那么列表框将是“1”、“2”、“3”…“15”。我希望每个数字都位于列表框中自己的行上。
谢谢。

您可以这样做:

Private Sub PopulateList(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

    Dim list As String() = New String(-1) {}
    Dim str As String = Me.TextBox1.Text
    Dim count As Integer = 0

    Integer.TryParse(str, count)

    If (count > 0) Then
        list = New String((count - 1)) {}
        For i As Integer = 0 To (count - 1)
            list(i) = (i + 1).ToString()
        Next
    End If

    Me.ListBox1.Items.Clear()
    Me.ListBox1.Items.AddRange(list)

End Sub

当我将此代码插入我的项目时,它运行良好。谢谢但是我对VB还不熟悉,所以你可以给这些行添加注释来解释你做了什么。我很难理解它。