我怎樣才能讓一個條件，停止我的計時器在10秒

Question

我有一個按鈕來啓動定時器：

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秒的條件。

Answer 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;如果是，則計時器將禁用。要使此功能起作用，您必須將計時器設置爲每秒鐘打勾。