vb如何任意截屏？“將一個按鈕和一個圖片框放在u2; event Lib “user32”（ByVal bVk為Byte，ByVal bScan為Byte，ByVal dwFlags為Long，ByV

vb如何任意截屏？

“將一個按鈕和一個圖片框放在u2; event Lib “user32”（ByVal bVk為Byte，ByVal bScan為Byte，ByVal dwFlags為Long，ByVal dwextranfo為Long）Const theScreen=0 Const theForm=1 Private Sub Command1 uclick（）Call keybd_2;event（vbKeySnapshot，the screen，0，0）DoEvents Picture1.picture=剪貼板.GetData（vbcfbitmap）end sub另外，注意把窗體和PictureBox做大一些，這樣你就可以很容易的看到一些

最簡單的截屏代碼：sendkeys“^{prtsc}”，true“把截屏復(fù)制到clipboardpicture1.picture=剪貼板.GetData（vbCFDIB）