如何好纯VB记录屏幕的变化，并存为AVI或BMP（多张）速度要快

Question

The Camtasia Screen Recorder SDK is a toolkit designed to allow you to easily add screen recording into your Windows application. With this toolkit, you can record screen activity, mouse movement and audio to create movies of the desktop experience. DownLoad CamSRSDK fromhttp://www.techsmith.com/developertools/screenrecordersdk/default.asp

Answer 1

发送“Print Screen”按键如何？MSDN中有个代码。

Answer 2

Private Sub Timer1_Timer()
Dim lDesktop As Long
Dim lDC As LongForm1.AutoRedraw = True
Form1.ScaleMode = 1lDesktop = GetDesktopWindow()
lDC = GetDC(lDesktop)
Me.Hide
BitBlt Picture1.hdc, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, lDC, 0, 0, vbSrcCopy
End Sub
可是这个方法只能存成BMP，且不快，有没有好的方法？上面用英文的老兄（dbcontrols）请你用中文告诉我好吗？

Answer 3

Private  Sub  Timer1_Timer()  
Dim  lDesktop  As  Long  
Dim  lDC  As  Long  
 
Form1.AutoRedraw  =  True  
Form1.ScaleMode  =  1  
 
lDesktop  =  GetDesktopWindow()  
lDC  =  GetDC(lDesktop)  
Me.Hide  
BitBlt  Picture1.hdc,  0,  0,  Picture1.ScaleWidth,  Picture1.ScaleHeight,  lDC,  0,  0,  vbSrcCopy  
SavePicture  …………
End  Sub