PRB: Cannot Paste PrintScreen Result to OLE Control

MORE INFORMATION

Steps to Reproduce and Work Around Behavior

1. Create a Standard EXE project in Visual Basic. Form1 is created by default.
2. Put an OLE control on Form1 and keep the default name, OLE1. Click Cancel when the "Insert Object" dialog box comes up.
3. Put a CommandButton on Form1 and keep the default name, Command1.
4. Add the following code to the code window of Form1:

         Private Sub Command1_Click()
           if OLE1.PasteOk = True then
               OLE1.Paste
           else
               msgbox "Can not paste!"
           End if
         End Sub
   						

5. Run the application. Pressing the ALT+PRINTSCRN key combination and then click the CommandButton. The message box "Can not paste!" is displayed, demonstrating the problem.
6. Stop the application.
7. Select Components from the Project menu and check "Microsoft Rich Textbox Control X.0."
8. Add a Rich Textbox to Form1 and keep the default name, RichTextBox1. Make sure its Visible property is set to True and its TabStop property is set to False. Make the Rich Textbox as small as possible and hide it under the CommandButton (because you don't want it to show on the screen). If necessary, right-click on the Rich Textbox and click "Send to Back."
9. Change the Command1_Click event handler to be:

         Private Sub Command1_Click()
           ' use RichTextBox to transform the clipboard info
           RichTextBox1.TextRTF = ""
           RichTextBox1.SetFocus
           SendKeys "^v", True
           SendKeys "^+{HOME}", True
           SendKeys "^c", True
           RichTextBox1.TextRTF = ""
   
           if OLE1.PasteOk = True then
               OLE1.Paste
           else
               msgbox "Can not paste!"
           End if
         End Sub
   						

10. Run the application again. Press the ALT+PRINTSCRN key combination and then click on Command1. This time the screen capture is pasted to the OLE control.