How?

How do you tell when someone is continuously holding down a key.

Code:

---

Dim dKey As Boolean
Private Sub Form_KeyDown(...)
  dKey = True
End Sub

Private Sub Form_KeyUp(...)
  dKey = False
End Sub

---

perhaps??

Seems so logical, i dont know how i missed it.