防止WinForm闪烁

一、起因

相信很多在用VS开发Winform的客户端程序的码农,都会碰到如题所示的问题。窗体在关闭或者打开时，总是会闪烁一下。对于我这种强迫症患者，看到这个闪来闪去，心里就不好。

随后在网上搜罗了一下,杂七杂八,你一言我一句,试遍了所有的方法,最终确定了以下方法,我试验后不再闪烁。

二、代码实现

网上的代码大部分都是用的C#，我将其换成了VB.net。将以下的代码放置于需要防止窗体闪烁的父窗体中

    Public Sub New()
        InitializeComponent()
        SetStyle(ControlStyles.UserPaint, True)
        SetStyle(ControlStyles.AllPaintingInWmPaint, True)
        SetStyle(ControlStyles.OptimizedDoubleBuffer, True)
    End Sub

    Protected Overrides ReadOnly Property CreateParams As CreateParams
        Get
            Dim cp As CreateParams = MyBase.CreateParams
            cp.ExStyle = cp.ExStyle Or &H2000000
            Return cp
        End Get
    End Property