如何将2张图片简单的合成？就是一张叠在另外一张图片上

如何将2张图片简单的合成？就是一张叠在另外一张图片上，上面的那张白色部分要能透明。

解决方案 »

  1.   

    对显示的位图进行掩码操作的源程序
    http://www.applevb.com/sourcecode/picmask.zip一个半透明的图像叠加的演示，利用Windows API将一个较小的图像叠加到一个大图像上并且小图像可以移动
    http://www.applevb.com/sourcecode/trans_effect.zip建立类似气球的屏幕精灵的程序。气球会在屏幕上上升然后停在屏幕顶端
    http://www.applevb.com/sourcecode/Page%20Balloon%20Now%20with%20API%20timer.zip
      

  2.   

    Option Explicit'添加两个PICTUREBOX控件,一个IMAGE控件
    '目的是将PICTURE1和IMAGE中的图片合并到PICTURE2中,并保存成文件
    Private Sub Command1_Click()
        Picture2.PaintPicture Picture1.Picture, 0, 0, Picture1.Width, Picture1.Height
        Picture2.PaintPicture Image1.Picture, 0, Picture1.Height
        SavePicture Picture2.Image, "C:\bb.bmp"
    End SubPrivate Sub Form_Load()
        '调整目标PICTURE控件的大小
        Picture2.Width = IIf(Picture1.Width > Image1.Width, Picture1.Width, Image1.Width)
        Picture2.Height = Picture1.Height + Image1.Height
        Picture2.AutoRedraw = True
    End Sub
      

  3.   

    在picturebox控件上分别用pictuer属性和loadpicture装入图片文件。