Question

VB 区域截图问题

Me.AutoRedraw = True BitBlt Me.hdc, 0, 0, 1100, 800, GetDC(0), 0, 0, vbSrcCopy '抓屏 SavePicture Me.Image, "c:\temp\1.bmp"
代码如上，生成的图片区域是准确的。但是多出来的灰色部分怎么回事。。刚好和我分辨率一样大了1440*900

Answer 1

窗体的Image区域尺寸默认就是屏幕的整个区域。你可以改用PictureBox：

Me.ScaleMode = 3
Picture1.AutoRedraw = True
Picture1.BorderStyle = 0
Picture1.Width = 1100
Picture1.Height = 800
BitBlt Picture1.hDC, 0, 0, 1100, 800, GetDC(0), 0, 0, vbSrcCopy
SavePicture Picture1.Image, "c:\temp\1.bmp"