[Erel]

See this post: D-Pad Navigation Sample (?)
Instead of "If specialKey = ..." you should use

Select SpeicalKey
 Case cUpKey
  ...
 Case cLeftKey
 ...
 Case cRightKey
 ...
 Case cDownKey
 ...
End Select