vb 区域截图是黑屏，哪里错了
我用的网上找的区域截图的代码，区域截图是黑色的，我对比了原代码，一直到不到是哪里的问题还有一个问题，我想截取固定320*240像素大小的图片，但是我的截取框比QQ截图里面320*240大小的框要小很多。
代码我上传到CSDN上了，请各位帮忙看看，谢谢！
http://download.csdn.net/detail/fly1229/5069114
http://download.csdn.net/detail/fly1229/5069114 --------------------编程问答-------------------- 只看了你的窗体代码
1、截图区域是黑色 ：看到你的文件里面有CSI 格式文件，你截图的是视频区域？这个普通方法不能截图（你的代码好像是用bitblt的方法截图的）。
2、截图区域小 ：在窗体的初始化过程里面有两句话Lab.Width = 320 '* 15 Lab.Height = 240 '* 15
把后面的注释去掉，这里的320和240的单位是缇，需要乘以十五转换为像素。
没细看你代码只能说那么多了。 --------------------编程问答-------------------- 怎么下载不下来？ --------------------编程问答-------------------- 可以下载啊 --------------------编程问答--------------------
CSI 文件没有用的
我截的是一般图片，不是视频，截出来的图片保存后也是纯黑色的，什么都看不到
Lab.Width = 320 * 15 Lab.Height = 240 * 15 ，乘以15后，截图框的大小和QQ截图框大小一样了，但是保存的图片尺寸不是320*240了。
用qq的截图320*240的框，保存的文件尺寸也是320*240的
不知道该怎么改，请再帮忙看看
--------------------编程问答-------------------- 为何不采用GDI+来操作？？ --------------------编程问答-------------------- 请看函数ScrnCap里的
SourceDC = CreateDC("DISPLAY", 0, 0, 0)
DestDC = CreateCompatibleDC(SourceDC)
BHandle = CreateCompatibleBitmap(SourceDC, rWidth, rHeight)
Ret = SelectObject(DestDC, BHandle)
Ret = BitBlt(DestDC, 0, 0, rWidth, rHeight, SourceDC, Left, Top, &HCC0020)
还是去查查BitBlt吧，你好像没明白DestDC，SourceDC的关系啊，还正SourceDC错了
补充：VB , 基础类
