请问一个图象问题？

[Dickson]

请问，我有两张图片，背景都为白色，怎样在VB把他们叠加一起，而不会一个把一个挡住。（就是实现图层。）

[xiaoxinghappy]

放到两个Picture 里

[Dickson]

不是，防到两个PICTURE里，搁在一起还会挡住

[yefm]

Private Declare Function TransparentBlt Lib "msimg32" (ByVal hdcdest As Long, ByVal nXOrigindest As Long, ByVal nYOrigindest As Long, ByVal nWidthdest As Long, ByVal nHeightdest As Long, ByVal HdcSrc As Long, ByVal nXOriginSrc As Long, ByVal nYOriginSrc As Long, ByVal nWidthSrc As Long, ByVal nHeightSrc As Long, ByVal CrTrans As Long) As Long

参数用法同BitBlt，只是最后一个参数CrTrans就是你要透明化的颜色，比如你要透明白色则：RGB(255,255,255)

[yefm]

Private Declare Function TransparentBlt Lib "msimg32" (ByVal hdcdest As Long, ByVal nXOrigindest As Long, ByVal nYOrigindest As Long, ByVal nWidthdest As Long, ByVal nHeightdest As Long, ByVal HdcSrc As Long, ByVal nXOriginSrc As Long, ByVal nYOriginSrc As Long, ByVal nWidthSrc As Long, ByVal nHeightSrc As Long, ByVal CrTrans As Long) As Long

参数用法同BitBlt类似，只是最后一个参数

[Dickson]

没别的方法吗？