vb 中如何操作 bitblt函数 最好举个例子

来源：百度知道 编辑：UC知道 时间：2024/05/19 18:19:36
我想将一张 图片贴到另外一张图片上去
很感谢大家的帮助 我再补充一下 希望能给点汉语注释 我实在看不懂英文

可以不用这个函数也能实现
你可以创建两个 相应的 图标框
Form1.Picture1(0).AutoRedraw = True
Form1.Picture1(0).AutoSize = False
Form1.Picture1(1).AutoRedraw = True
Form1.Picture1(1).AutoSize = False
Form1.Picture1(0).Left = Form1.Picture1(1).Left
Form1.Picture1(0).Top = Form1.Picture1(1).Top
Form1.Picture1(0).Width = Form1.Picture1(1).Width
Form1.Picture1(0).Height = Form1.Picture1(1).Height
然后由 Form1.Picture1(1)覆盖住Form1.Picture1(0)通过调节
Form1.Picture1(1)的Height Width
来调节显示的具体样式

有这个函数马？

BOOL BitBlt(
HDC hdcDest,
int nXDest,
int nYDest,
int nWidth,
int nHeight,
HDC hdcSrc,
int nXSrc,
int nYSrc,
DWORD dwRop
);
Parameters
hdcDest
[in] Handle to the destination device context.
nXDest
[in] Specifies the logical x-coordinate of the upper-left corner of the destination rectangle.
nYDest
[in] Specifies the logical y-coordinate of t