Visual Basic添加数字循环

时间:2014-06-10 16:57:29

标签: vb.net winforms basic

我正在努力使一个空闲的游戏像cookie点击器一样,我遇到的问题是制作一个简单的代码行,每秒重复一次,每秒加一个数字。谁能帮助我?如果有人点击按钮,我想要启动循环。

4 个答案:

答案 0 :(得分:0)

你可以使用计时器。单击按钮时启用/启动计时器。

请参阅MSDN上的示例:Windows Form Timer

答案 1 :(得分:0)

添加一个计时器并在按钮代码中输入:

TimerName.start

并在计时器代码中添加:

TimerName.interval = 1000
'replace TimerName with the name of timer you just added
'this will add 5 to number you want every second , interval of timer = 1000 that means it does the code every second
NumberThatYouWant += 5
'Replace NameThatYouWant with the number name that you want to add 5 to it every second

答案 2 :(得分:0)

是的,创建一个计时器,然后将timer.interval设置为1000以每秒打勾,然后为timer.tick创建一个子,并将要增加的数字放在那里,这应该有效。

EG。

Private Sub Timer1_Tick() Handles Timer1.Tick
    variable += 5
End Sub

您必须在属性窗口(右下角)中更改间隔

希望这有帮助!

编辑:我没有包含Timer1.start,因为其他答案都说明了这一点。别忘了使用它。

答案 3 :(得分:0)

设置定时器

首先,在表单中添加计时器控件。将计时器的间隔值设置为“1000”(计时器的间隔以毫秒为单位)。您还应该在运行时启用计时器:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Timer1.Enabled = True
End Sub

所以你的代码看起来应该类似于:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    Timer1.Interval = 1000
End Sub

使用Timer

添加值

现在说按钮的名称是'button1',我们现在将完成代码,每隔1秒向按钮的文本属性添加5,如下所示:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    Timer1.Interval = 1000
    Button1.Text += 5
End Sub

此代码也可以写成“Button1.Text = Button1.Text + 5”我希望这有助于消除歧义。