Question

我正在尝试制作一个能够在列表中添加10个随机数的程序。在此之后，您可以查看最低，最高，平均和中位数是多少。

Public Class number
    Private _numbers As List(Of Integer)

    Public Property numbers() As List(Of Integer)
        Get
            Return _numbers
        End Get
        Set(ByVal value As List(Of Integer))
            _numbers= value
        End Set
    End Property

     Public Function addnumber() As Integer
        Dim rnd As New Random

        For teller As Integer = 0 To 9
            _numbers(teller) &= rnd.Next(0, 1001)
        Next

        Return _numbers.Sort
    End Function
End Class

在代码末尾（Return _numbers.Sort），它表示表达式不会产生值。有什么提示可以解决这个问题吗？

Answer 1

您的代码存在许多问题。

首先，回答你的问题：看看documentation of List.Sort。它没有返回一个值。它就地对列表进行排序。

接下来，您不能将&=与以下行中的整数列表一起使用：

_numbers(teller) &= rnd.Next(0, 1001)

如果此代码在没有投诉的情况下进行编译，那么您需要在项目设置中启用Option Strict（并在全局范围内进行编译）。 &=是字符串连接运算符。

接下来，您的代码会尝试覆盖列表中的项目，但您从未指定该列表应包含10个项目。因此，这将在运行时失败ArgumentOutOfRangeException。您需要Add列表中的项目 - 再次参考文档。

数字静态VB.NET

1 个答案: