VB Snippet - Copy Picture to Clipboard

VB Code:

Private Sub Command1_Click()
 
    Clipboard.Clear
 
    Clipboard.SetData Picture1.Picture
 
End Sub