H E L P I Need Input On The Screen

Well,

I would like to enter the data with a keyboard and also with a touchscreen so each command button of the form has to fill up the keyboard buffer just like you should press a key on the keyboard.

Do you understand?

An example

when i press 3 * (buttons on the form) on the touchscreen and i scan an article, it means that i want to sell 3 times the article.
so i don't have to scan 3 times the same.

But i'd like to fill up the form with the sendkeys method.

How can i fix it?

I already used a code in my form:
i putted the acitve cell on my form
and send a string to it using sendkeys
but it stays in my form_keydown sub and it always repeats.

HELP

ok, I still don't get it, but then again I don't have to :)

try this

Code:

---

Private Sub Form_Keydown(KeyCode As Integer, Shift As Integer)
    Me.KeyPreview = False
    DoEvents
    Text1.SetFocus
    SendKeys "5", False
    DoEvents
    Me.KeyPreview = True
End Sub

---