Private Sub Text1_KeyDown (KeyCode As Integer, Shift As Integer)
if vbKeyLeft then Msg "Du tryckte vänster piltangent"
end sub
koderna för dom olika piltangenterna är, inte så oväntat,
vbKeyLeft 0x25 LEFT ARROW key
vbKeyUp 0x26 UP ARROW key
vbKeyRight 0x27 RIGHT ARROW key
vbKeyDown 0x28 DOWN ARROW key
Man behöver bara använda vb namnet men du kan ju få värdena också om du vill det ;-)
KeyDown eventet finns för massa andra object också. Det är bara ta objectet_KeyDown så får man det.