таймер в VB. Net не сбрасывается как запрограммировано - PullRequest
0 голосов
/ 24 января 2020

Моя цель - запустить еще один сабвуфер по прошествии определенного времени. Все это происходит после того, как пользователь установит флажок. У меня есть похожая программа, которая использует ту же технику, и она прекрасно работает.

Однако, она не обнаружит, что таймер является отрицательным числом. Он просто продолжает идти.

Любая помощь очень ценится.

    Private Sub dataRecall()

        MsgBox("Pass")

    End Sub

    Private Sub liveViewTimer_Tick(sender As Object, e As EventArgs) Handles liveViewTimer.Tick

        If realTimeTimer <= 10 Then
            realTimeTimer -= 1
        ElseIf realTimeTimer = 0 Then
            realTimeTimer = 10
            dataRecall()
        End If


    End Sub

    Private Sub liveViewCheck_CheckedChanged(sender As Object, e As EventArgs) Handles liveViewCheck.CheckedChanged
        If liveViewCheck.Checked = True Then
            liveViewTimer.Start()
        ElseIf liveViewCheck.Checked = False Then
            liveViewTimer.Stop()
            realTimeTimer = 10
        End If
    End Sub

1 Ответ

0 голосов
/ 24 января 2020

Я подозреваю, что предполагаемый код больше похож на:

Private Sub dataRecall()

    MsgBox("Pass")

End Sub

Private Sub liveViewTimer_Tick(sender As Object, e As EventArgs)

    If realTimeTimer <= 10 Then
        realTimeTimer -= 1
    End If

    If realTimeTimer = 0 Then
        realTimeTimer = 10
        dataRecall()
    End If

End Sub

Private Sub liveViewCheck_CheckedChanged(sender As Object, e As EventArgs) Handles liveViewCheck.CheckedChanged
    If liveViewCheck.Checked = True Then
        realTimeTimer = 10
        liveViewTimer.Start()
    Else
        liveViewTimer.Stop()
    End If

End Sub

Так что, когда флажок установлен, dataRecall вызывается через десять секунд (или что-то еще) спустя и каждые десять секунд после этого.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...