如何在10秒钟内制作一个停止计时器的条件

时间:2014-06-30 03:23:23

标签: vb.net timer

我有一个启动计时器的按钮:

Private Sub StartBtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Start.Click

    Timer1.Enabled = True

End Sub

我有一个定时器,其中包含 0 - 75 范围内的随机数:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    Label1.Text = random.Next(0, 75)
End Sub

如何给出条件10秒钟我的标签或计时器将停止。

1 个答案:

答案 0 :(得分:0)

您可以在计时器函数中声明一个整数,并在每次计时器滴答时将其递增1。然后,您可以在每次计时器滴答时评估整数的值。当它达到10时,你可以使用Timer1.Enabled = False。例如: 首先,声明整数变量。

Public timerCount As Integer = 0

然后,在你的计时器功能中:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    Label1.Text = random.Next(0, 75)
    If timerCount = 10 Then
        Timer1.Enabled = False
    Else
        timerCount = timerCount + 1
    End If
End Sub

所以在这种情况下,新的定时器函数将检查变量是否等于10.如果是,则定时器将禁用。要使此功能起作用,您必须将计时器设置为每秒刻度。