Visual Basic adding number loop

Question

I am trying to make an idle game something like cookie clicker, and I am having problems with making a simple line of code that repeats every second and adds 5 to a number every second. Could anyone help me? I want this to start the loop if someone clicks the button.

score 0 · Answer 1 · answered Jun 11 '14 at 07:18

0

you could use a timer. Enable/start the timer when the button is clicked.

See example at MSDN: Windows Form Timer

answered Jun 11 '14 at 07:18

Chalky

1,624
18
20

score 0 · Answer 2 · answered Jun 23 '14 at 17:59

add a timer and in the button code type :

TimerName.start

and add this in the timer code :

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

score 0 · Answer 3 · answered Jul 10 '14 at 19:56

Yeah create a timer, then set the timer.interval to 1000 to tick each second, then create a sub for timer.tick and put the number you want to be increased in there and that should work.

EG.

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

You have to change the interval in the properties window (bottom right)

Hope this helps!

Edit: I didn't include Timer1.start because the other answers said that. Don't forget to use it.

score 0 · Answer 4 · answered Jul 22 '14 at 21:13

Setting the Timer

First, add a timer control to your form. Set the timer's interval value to '1000' (the timer's interval is measured in milliseconds). You should also enable your timer at run-time:

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

So your code should look similar to this:

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

Adding the value with the Timer

Now say the button's name is 'button1', we will now finish the code to add 5 to the button's text property every 1 second, like so:

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

This code can also be written as "Button1.Text = Button1.Text + 5" I hope this helps clear up the ambiguity.

Visual Basic adding number loop

4 Answers4

Setting the Timer

Adding the value with the Timer