Declare Function SetDIBits Lib "gdi32.dll" ( _
                 ByVal hdc As Long, _
                 ByVal hBitmap As Long, _
                 ByVal nStartScan As Long, _
                 ByVal nNumScans As Long, _
                 lpBits As Any, _
                 lpBI As BITMAPINFO, _
                 ByVal wUsage As Long) As Long