ASCII-koder

Er der nogen der har koderne til piltasterne, ascii-koderne og lige tjekke om dette ikke ser rigtigt ud:

Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
y = y + 1
End If
End Sub

Det skulle i dette tilfælde gerne få noget til at rykke sig en pixel ned ved tryk på enter, men jeg ville gerne have koderne for alle tasterne, specielt pilstasterne så jeg kunne lave et spil.