lDstWidth, lDstHeight, lSrcDC, lSrcX,
             lSrcY, vbSrcCopy
            lDstX = lDstX + lDstWidth
            lSrcX = 0
            lDstWidth = lBitmapW
        Loop
        lDstY = lDstY + lDstHeight
        lSrcY = 0
        lDstHeight = lBitmapH
    Loop
End Sub



''' &lt;summary&gt;
''' Translates a unreferenced pointer to a COM object returned
''' by ObjPtr into an object reference.
''' &lt;/summary&gt;
''' &lt;param name="lPtr"&gt;Unreferenced pointer to a COM object&lt;/param&gt;
''' &lt;ret