我如何為所有表格設置1個計時器，然后逐漸減少？ Visual Basic 2010

Question

我有一個程序，當您單擊一個按鈕進入表格2時，您從表格1開始，然后選擇一個隨機表格（3,10）並停留在那里十秒鍾，然后返回表格2以選擇另一個隨機表格。表單，但是這次表單保持打開狀態為9個半秒。 但是每次隨機形式回到形式2時，都需要完全關閉（me.close（））

我有一些隨機表格可以工作到表格2並選擇一個隨機表格，但是我似乎找不到所有依靠一個計時器的表格的方法。 有可能嗎，有沒有更簡單的方法？

干杯!

Answer 1

您可以創建一個將計時器保存在其中的單例類。
每當打開新的隨機表單時，都需要使用該表單的實例以及保持它打開的時間來通知該類。
計時器將在此類中，並且經過的事件將使用您發送給initialize方法的表單的引用。

像這樣：

    Public Sub FormOpened(form As Form, CloseAfter As Integer)
        _CurrentForm = form
        _Timer.Interval = CloseAfter
        _Timer.Start()
    End Sub

    Private Sub Timer_Elapsed(sender As Object, e As System.Timers.ElapsedEventArgs)
        _CurrentForm.Close()
        _Timer.Stop()
    End Sub
End Class

注意：以下划線開頭的變量是類成員。