With this miniprogram you can check the arrow keys. When they are used and released a new information is shown.
You need a textbox to get the program going.
Once you started the program and you use an arrow key in the textbox, the content of the textbox will change.
The Code
PUBLIC SUB TextBox1_KeyRelease() SELECT Key.code CASE Key.left Textbox1.Text ="Left" CASE Key.right Textbox1.Text ="Right" CASE Key.up Textbox1.Text ="Up" CASE Key.down Textbox1.Text ="Down" END SELECT END
-- ReinerHoffmann - 31 Jan 2004
KeyRelease event does not have any parameter anymore, and you should better use Key.Left, Key.Right, Key.Up and Key.Down instead of the numeric values. -- BenoitMinisini - 05 Feb 2004
fixed now (I think ;) ) -- RobKudla - 10 Feb 2004