Question

我正在编写一个填充用户定义大小数组的应用程序，其中包含1-99的随机整数。然后，它会在列表框中显示所有这些带有索引谓词的数字。但是，当你输入长度为10,000时，列表框似乎无法生成大于6,000的数字并重置为3,000。这是为什么会发生的？（注意：我使用的是Visual Studio 2010）

VB.NET代码：

Public Class frmDynamicNumbers

Private Sub btnClick_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClick.Click
    Dim input As String = txtInput.Text
    Dim size As Int64 = 0
    If Not Integer.TryParse(input, size) Then
        MsgBox("Please enter a valid number")
        Exit Sub
    End If
    Dim a(size) As Int64
    CreateArray(a)
End Sub

Sub CreateArray(ByRef a As Int64())
    lstDisplay.Items.Clear()
    For i As Int64 = 0 To a.Length - 1
        Dim temp As Int64 = RndInt(1, 99)
        lstDisplay.Items.Add(i.ToString + vbTab + temp.ToString)
    Next
End Sub

Function RndInt(ByVal max As Integer, ByVal min As Integer) As Int64
    Randomize()
    Return Int((max - min + 1) * Rnd()) + min
End Function
End Class

为什么列表框中的值只是在某个点开始重复

0 个答案: