如何使 Randomize 函数随机化计时器间隔？答案

【问题标题】：How to make Randomize function to randomize the timers intervals?如何使 Randomize 函数随机化计时器间隔？
【发布时间】：2011-03-30 15:59:14
【问题描述】：

我无法弄清楚 vb.net 的代码会随机化某个计时器的间隔。对于每个 a = a + 1，会有不同的间隔，对于每个 a = 1、a = 2、a = 3 等，标签上会显示不同的文本。

如果您知道如何实现，请提供帮助。谢谢。

【问题讨论】：

标签： vb.net timer intervals

【解决方案1】：

我可能不太明白这样的事情

将 arrLbls(3) 调暗为标签
'一个具有 4 个标签类型元素的数组' '填充数组'

arrLbls(0) = Label1
arrLbls(1) = Label2
arrLbls(2) = Label3
arrLbls(3) = Label4

'loops trought array'

For i As Int16 = 0 To arrLbls.Length - 1
    arrLbls(i).Text = "Label from the array " & i + 1
Next

【讨论】：

【解决方案2】：

利用 Random 类

   Public Function RandomNumber(ByVal MaxNumber As Integer, _
    Optional ByVal MinNumber As Integer = 0) As Integer

      'initialize random number generator
        Dim r As New Random(System.DateTime.Now.Millisecond)

      'if passed incorrect arguments, swap them
        'can also throw exception or return 0

        If MinNumber > MaxNumber Then
            Dim t As Integer = MinNumber
            MinNumber = MaxNumber
            MaxNumber = t
        End If

        Return r.Next(MinNumber, MaxNumber)

    End Function

【讨论】：

请注意，如果在很短的时间内多次调用此方法，Next方法将生成相同的随机数。