vb怎样把抓取的图象放到picturebox里?代码?

Option Explicit
Private Declare Sub keybd_event Lib "user32" _
(ByVal bVk As Byte, _
ByVal bScan As Byte, _
ByVal dwFlags As Long, _
ByVal dwExtraInfo As Long)
Private Sub Command1_Click()
keybd_event vbKeySnapshot, 0&, 0&, 0&
DoEvents
Picture1.Picture = Clipboard.GetData(vbCFBitmap)
End Sub

format 可选的。一个常数或数值，如“设置值”中所描述的，它指定 Clipboard 图形的格式。必须用括号将该常数或数值括起来。如果 format 为 0 或省略，GetData 自动使用适当的格式。
如果 Clipboard 对象没有与期望的格式相匹配的图形，则返回空。如果 Clipboard 对象中只有一个调色版，则创建最小尺寸 (1x1) 的 DIB。

所以最好不选。