求助!CreateCompatibleD绘出黑呼呼的东西

ttt = CreateCompatibleDC(Me.hdc)
kkk = CreateCompatibleBitmap(ttt, 200, 200)
fff = SelectObject(ttt, kkk)

BitBlt Picture1.hdc, 0, 0, 200, 200, ttt, 0, 0, vbSrcCopy
Picture1.Refresh

为什么BitBlt 出来的东西是黑呼呼的，谁帮我看下哪里错了


主要解决的是:
有一个大图片,远远超出了form窗口
请问有什么法子能bitblt出超出form窗口的图像
我用上面的语法bitblt出来的东西是全黑的,不知哪里错了,有什么别的方法能bitblt么

[ 本帖最后由 wzqqwz 于 2006-9-2 22:55 编辑 ]