Question

关于VB编程屏幕截图

请问在VB中如何使用API函数编程获取屏幕上任意区域的图像？请回答出具体的函数及详细用法。若API不能实现，请问还有其他方法吗？

Answer 1

需要的控件picture ，timer然后放入代码============自己领悟吧。。Private Declare Function GetDesktopWindow Lib "user32" () As LongPrivate Declare Function GetDC Lib "user32" (ByVal hwnd As Long) _As LongPrivate Declare Function BitBlt Lib "gdi32" _(ByVal hDestDC As Long, ByVal x As Long, _ByVal y As Long, ByVal nWidth As Long, _ByVal nHeight As Long, ByVal hSrcDC As Long, _ByVal xSrc As Long, ByVal ySrc As Long, _ByVal dwRop As Long) As Long
Private Sub Form_Resize()Picture1.Width = Me.WidthPicture1.Height = Me.HeightEnd Sub
Private Sub Timer1_Timer()Dim lDesktop As LongDim lDC As LongPicture1.ClsForm1.AutoRedraw = TrueForm1.ScaleMode = 1lDesktop = GetDesktopWindow()lDC = GetDC(lDesktop)BitBlt Picture1.hDC, 0, 0, Screen.Width, Screen.Height, lDC, _0, 0, vbSrcCopyEnd Sub

Answer 2

C++的我会……