VB视频捕捉实例.rar

VB视频捕捉，部分代码： 　　'创建视频窗口 　　'读取驱动程序列表 　　capGetDriverDescriptionA0,lpszName,100,lpszVer,100 　　'创建视频窗口程序 　　lwndC=capCreateCaptureWindowA(lpszName,WS_CAPTIONOrWS_THICKFRAMEOrWS_VISIBLEOrWS_CHILD,-5,-30,Pic1.Width-100,Pic1.Height-100,Pic1.hwnd,0) 　　'把捕捉