Question

vb中如何实现图片的重叠显示，就是两张透明图片重叠显示在一起，最好是有例子？

Answer 1

Private Declare Function AlphaBlend Lib "msimg32.dll" (ByVal hdc As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal hdc As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal BLENDFUNCT As Long) As Long

Private Sub Command1_Click()
AlphaBlend Picture1.hdc, 0, 0, 100, 100, Picture2.hdc, 0, 0, 100, 100, 128 * &H10000
End Sub

AlphaBlend 就是实现两幅图片的alpha混合

透明度 参数 BLENDFUNCT 使用时 取值为 透明度(0-255)*&H10000

Answer 2

alphablend只是两个图片简单的alpha混合，如果想实现类似于PS中那些混合模式，可以参考
http://blog.csdn.net/laviewpbt/archive/2006/05/26/756464.aspx