A mouse Clicks per minute counter I made in VB.

Need help in the world of technology? Here is the section for you, or talk about your favourite tech related topic, or what is new in the world of tech here.
Post Reply
User avatar
froggyboy604
Anime music gaming Fanatic
Posts: 35818
Joined: Thu Aug 18, 2005 11:28 pm
Contact:

A mouse Clicks per minute counter I made in VB.

Post by froggyboy604 »

click the click button as fast of you can till the button disapears after 60 seconds.

Download link: http://www.mxproject.com/freehost/frogg ... ounter.zip

Size: 8 KB

I can get 250 mouse click on the click button before the click button disapears.

If I just hold down enter, I get 1527 clicks.
SetoTK
Low flying mountains just to the right.
Posts: 5092
Joined: Tue Aug 16, 2005 8:34 pm
Location: London, England
Contact:

Post by SetoTK »

the mouse click window doesn't show up, it's just a black box,
I never really understood Thursdays.
User avatar
froggyboy604
Anime music gaming Fanatic
Posts: 35818
Joined: Thu Aug 18, 2005 11:28 pm
Contact:

Post by froggyboy604 »

Odd, it works for me. I van see the mouse click button.
SetoTK
Low flying mountains just to the right.
Posts: 5092
Joined: Tue Aug 16, 2005 8:34 pm
Location: London, England
Contact:

Post by SetoTK »

i see the 'click' but there is no counter
I never really understood Thursdays.
User avatar
froggyboy604
Anime music gaming Fanatic
Posts: 35818
Joined: Thu Aug 18, 2005 11:28 pm
Contact:

Post by froggyboy604 »

http://www.mxproject.com/freehost/frogg ... ounter.zip

Ah, I think you probably downloaded my early black version that had a counter with a black background and white font.

Here is a different version with a purple background which I tested and it works.

code for counter.
Public Class Form1
Private Sub xCounterButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles xCounterButton.Click
Static counter As Integer
counter = counter + 1
Me.xCounterLabel.Text = counter
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Me.xCounterButton.Visible = False
End Sub
End Class
Post Reply