用StretchBlt 打印图形时电脑就死机

StretchBlt inHdc, xStartTemp, yStartTemp, _
CLng(frmR.P1.Width ), _
CLng(frmR.P1.Height), _
frmR.P1.hDC, 0, 0, CLng(frmR.P1.Width), _
CLng(frmR.P1.Height), vbSrcCopy

用vb运行时打印是很正常的，就是编译之后一打印就死机，还有就用虚拟打印就没有问题的，好郁闷啊
好像加载小的icon图标就没有问题，加载了大一些的jpg图片格式就死机了，必须重启电脑