PRB: SendKeys Does Not Work with NumLock or Caplock

MORE INFORMATION

Steps to Reproduce Behavior

1. Start a new Standard EXE project. From1 is created by default.
2. Add a TextBox to Form1 and paste the following code in the code Window:

       Private Sub Text1_Click()
           SendKeys "s"
           SendKeys "{CAPSLOCK}"  ' Turn on the CapsLock
           SendKeys "o"  ' will be printed in caps
           For i = 0 To 10
           SendKeys Chr(Asc("a") + i)  'will be printed in caps
           Next
           'DoEvents  ' uncommenting this will print next line in smalls
           SendKeys "o"  ' will be printed in caps
           SendKeys "{CAPSLOCK}"  ' Turn off the caps lock
           SendKeys "o"  ' Will be printed in smalls
       End Sub
   
   						

3. Turn off the Caps Lock. Run the project. Note that the SendKeys work as expected.
4. Un-comment the DoEvents statement. Run the project. The Caps Lock is reset after the DoEvents call.
5. In any SendKeys statement after SendKeys "{CAPSLOCK}", pass "True" as the second parameter. The state of Caps Lock is reset after that statement.