I would like to enable the Numlock with VB-Code.

Any clues?