Question

每次点击一个按钮并且单选按钮检查它时，我需要增加1％的进度条...？我怎么能做到..我正在学习Visual Basic ..谢谢！

Public Class Form1

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

    ProgressBar1.Increment(+1)


End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    If RadioButton1.Checked = True Then


    End If
End Sub

结束班

Answer 1

您无需使用计时器。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    If RadioButton1.Checked = True Then
    dim x as integer= ProgressBar1.value
    x += 1
    ProgressBar1.value = x

    End If
End Sub

Answer 2

你可以做更简单的事情。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    ProgressBar1.PerformStep()
End Sub

PerformStep向上移动一个增量。基于您的增量的步骤。要更改它，请更改属性中的Step。默认为10。要获得更多好处，请转到 here以获取所有进度条的乐趣。

Answer 3

Private Sub Button1_Click（发件人为对象，e为EventArgs）处理Button1.Click

    If RadioButton1.Checked = True Then
        Timer1.Enabled = True
        Timer1.Interval = 100 '1000 is 1 sec
    End If

End Sub

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

    ProgressBar1.Increment(+1)
    If ProgressBar1.Value = 100 Then
        Timer1.Enabled = False
    End If
End Sub

使用visual basic上的按钮增加进度条？

3 个答案: