如何创建可在5秒内停止的随机移动数字,它会一直生成随机数,并在定时器达到5秒时停止
答案 0 :(得分:0)
尝试将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()
以启动计时器