Breadcrumbs

[KraZy]

I stay using this class for the PictureBox background trasparent, but seems that if I want clean the PictureBox like = TrasparentPictureBox.Image = Nothing(), the image don't disappear and I obtain all new image overlapping to the previous. How can I fix this?

Code: Select all

Public Class TransparentPictureBox
    Inherits PictureBox

    Public Sub New()
        Me.SetStyle(ControlStyles.Opaque, True)
        Me.SetStyle(ControlStyles.OptimizedDoubleBuffer, False)
    End Sub

    Protected Overrides ReadOnly Property CreateParams() As System.Windows.Forms.CreateParams
        Get
            Dim cp As CreateParams = MyBase.CreateParams
            cp.ExStyle = cp.ExStyle Or &H20  ' Turn on WS_EX_TRANSPARENT
            Return cp
        End Get
    End Property
End Class