Attached is simple repeat button. I found it useful on my trends when I wanted to hold the button down and have it repeat.
Use the mouse down event,
Private Sub btn_Test_MouseDown(sender As Object, e As EventArgs) Handles btn_Test.MouseDown
'Do stuff
End Sub