Uncommented

Uncommented -
'If GetKeyPress(Keys.A) Then
-        '    Key = Key & "a"
-        'End If