如何创建随机移动数字

Question

如何创建可在5秒内停止的随机移动数字，它会一直生成随机数，并在定时器达到5秒时停止

Answer 1

尝试将System.Timers.Timer与Random类一起使用：

如果您使用的是Windows窗体，这非常简单。使用Timer控件并每隔几毫秒随机化一次：

Dim sec as Decimal
Dim targetSeconds as Integer = 5
Dim rnd as New Random()

'Omitting the parameters of the event
Private Sub timer_tick() Handles Timer.Tick
    sec = sec + Timer.Interval
    Label.Text = rnd.Next()
    If sec >= targetSeconds Then
        Timer.Stop()
    End If
End Sub

但是，如果您使用的是控制台应用程序，则要将变量指定为System.Timers.Timer，添加Tick事件处理程序并使用与上面相同的代码。务必致电Start()以启动计时器