每次计时器计数1000毫秒时,数字变量不会加1并显示在标签中。 - vb.net

时间:2012-04-05 11:36:05

标签: vb.net checkbox timer

这是我的代码:

 number = 1
    If chkFN.Enabled = True Then
    If ProgressBar1.Value < 100 Then
             number += 1
             lblFN2.Text = number
        Else
             lblFN2.Text = "0"
        End If
    End If

我有一个复选框,进度条和标签。

当进度条低于100时,我希望每次计时器计数时数字变量为+ 1.我尝试过“X = X + 1” - 它工作到了一个点,但我需要重置变量当进度条达到100%并且单击停止按钮时为“0”。

虽然我一直在打字,但我也试过了:

        X = X + 1

    If chkFN.Enabled = True Then
        If ProgressBar1.Value < 100 Then
            lblFN2.Text = X + 1
        ElseIf AxWindowsMediaPlayer1.playState = WMPLib.WMPPlayState.wmppsMediaEnded   
        Then
            X = 0
            lblFN2.Text = "0"
        Else
            X = 0
            lblFN2.Text = "0"
        End If
    End If

但是当你再次启动计时器时,它只是从它的最后一个号码恢复,例如“13”并且不会重置为“0”。

感谢帮助人员:)

1 个答案:

答案 0 :(得分:0)

使用您的第一个代码,但添加

数字+ = 1

到Else条件。您需要重置变量,或者只是再次递增它。