Visual Basic PictureBox 上没有透明度

Question

我在Visual Basic Express 2010上有一些图片框，这些图片上有alpha通道，但是当背景颜色设置为透明时，它并没有变成透明而是变成了窗体的颜色。我仍然无法通过 alpha 贴图看到其他任何东西。问题是什么？我不仅想看到图片框后面的父对象，还想看到它下面的所有其他对象。

Answer 1

我有一些代码可以通过将其背后的每个控件绘制到其背景上来为控件创建“适当”的透明度。

如何使用：

1）创建自定义类。（来自“添加新项目”菜单）

2）给它您选择的名称（例如：TransparentPictureBox）

3) 让它继承原来的PictureBox。

Public Class TransparentPictureBox
    Inherits PictureBox

End Class

4) 将此代码粘贴到类中：

Protected Overrides Sub OnPaintBackground(e As System.Windows.Forms.PaintEventArgs)
    MyBase.OnPaintBackground(e)

    If Parent IsNot Nothing Then
        Dim index As Integer = Parent.Controls.GetChildIndex(Me)

        For i As Integer = Parent.Controls.Count - 1 To index + 1 Step -1
            Dim c As Control = Parent.Controls(i)
            If c.Bounds.IntersectsWith(Bounds) AndAlso c.Visible = True Then
                Dim bmp As New Bitmap(c.Width, c.Height, e.Graphics)
                c.DrawToBitmap(bmp, c.ClientRectangle)
                e.Graphics.TranslateTransform(c.Left - Left, c.Top - Top)
                e.Graphics.DrawImageUnscaled(bmp, Point.Empty)
                e.Graphics.TranslateTransform(Left - c.Left, Top - c.Top)
                bmp.Dispose()
            End If
        Next
    End If
End Sub

该代码将覆盖 PictureBox 的OnPaintBackground事件，从而绘制它自己的透明背景。

5) 构建您的项目。

6) 从工具箱中选择您的组件并将其添加到您的表单中。

希望这可以帮助！

结果：

编辑：

除了您的评论，首先通过Build>Build <your project name>菜单构建您的项目。

然后您可以在工具箱顶部的<your project name> Components类别下找到您的自定义控件。