我如何从定义的数字列表中生成一个数字,而不是一系列数字,即 1-10

How would I generate a number from a list of defined numbers, rather than a range of numbers i.e. 1-10

    Randomize()
    Dim gen_numb2 As Integer = CInt(Int((6 * Rnd()) + 1))
    Second_Number.Text = gen_numb2

我正在使用上面的代码生成数字,这些数字在我受命创建的 child 的数学程序中使用。我只需要知道如何让处理程序从我定义的列表中选择一个数字。我需要这样做,因为如果我为乘法或除法问题生成 2 个数字,72 x 32 对于 10 或 11 的 child 来说太难了。相反,我想生成第一个数字,我有已经排序,并且处理程序从数字列表中选择第二个数字,如 1、2、5、10;这样 child 就可以更简单地解决数学问题 (32 x 2)。我确信它很简单,但我认为似乎只有人们要求随机数。

正如上面评论者所说,我会用几个具有预定义值的构造来处理它,然后从中随机选择。

这里肯定有改进和改变的空间,但这应该[希望]让你开始:

' Values available for selection.
Dim values1 As Integer() = {1, 2, 3, 4, 5}
Dim values2 As Integer() = {16, 32, 64}

' Randomize the selection.
Dim randomizer As New Random

' Pick a value from each array.
Dim value1 As Integer = values1(randomizer.Next(values1.Length))
Dim value2 As Integer = values2(randomizer.Next(values2.Length))

' Present the problem.
Value1TextBox.Text = value1
Value2TextBox.Text = value2
' Store the answer in the Tag property so we can get to it easily.
AnswerTextBox.Tag = value1 * value2