Help with Sendkeys command

this is probably a n00b question
I want to have a program , that after clicking a button on a form (could be called "Go") repeatedly simulates the pressing of a key on the keyboard until it is told to stop.

I can work it all out apart from how to code the keyboard press.

Can anyone help please
Thanks

Sendkeys("a")

that would send the a letter to whatever app was in focus

Welcome to VBF Paul. http://www.vbforums.com/images/ieimages/2006/08/1.gif

Please give your topics a useful title, everyone needs help. ;)

Name your CommandButton "cmdGo" and try this:

VB Code:

Option Explicit
 
Private Sub Form_Load()
    cmdGo.Caption = "Go"
End Sub
 
Private Sub cmdGo_Click()
    If cmdGo.Caption = "Go" Then
        cmdGo.Caption = "Stop"
    Else
        cmdGo.Caption = "Go"
    End If
        Do Until cmdGo.Caption = "Go"
            SendKeys "a", True
                DoEvents
        Loop
End Sub

And welcome to VBForums :wave:

Quote:

---

Originally Posted by gavio

Name your CommandButton "cmdGo" and try this:

VB Code:

Option Explicit
 
Private Sub Form_Load()
    cmdGo.Caption = "Go"
End Sub
 
Private Sub cmdGo_Click()
    If cmdGo.Caption = "Go" Then
        cmdGo.Caption = "Stop"
    Else
        cmdGo.Caption = "Go"
    End If
        Do Until cmdGo.Caption = "Go"
            SendKeys "a", True
                DoEvents
        Loop
End Sub

And welcome to VBForums :wave:

---

Wow the code I was going to post was exactly the same as yours. :eek2:

Quote:

---

Originally Posted by DigiRev

Wow the code I was going to post was exactly the same as yours. :eek2:

---

:D

I found this peace of code to be... anoying... my notebook ventilator just sang like a canarian... :sick:

thats excellent , just what I was after :)
thanks guys

you can use a timer to provide an interval after you click go, because you probably dont want to send key presses to your form or button

Yes ive used a timer to do this

like this

Private Sub Timer1_Timer()
SendKeys "4"
End Sub

The program works fine when I run it and then load up notepad. But when I try to run the game im trying to get this to run with it doesnt work , almost as if the game doesnt have focus.

Anyone have any thoughts?

Great stuff so far though :D

Whats the game?