加载窗口(AfterLoad)时加上
Dim p1 As WinForm.Panel = e.Form.Controls("Panel1")
Dim p2 As WinForm.Panel = e.Form.Controls("Panel2")
p1.baseControl.Gettype().GetProperty("DoubleBuffered", Reflection.BindingFlags.Instance Or System.Reflection.BindingFlags.NonPublic).SetValue(p1.baseControl,True,Nothing)
p2.baseControl.Gettype().GetProperty("DoubleBuffered", Reflection.BindingFlags.Instance Or System.Reflection.BindingFlags.NonPublic).SetValue(p2.baseControl,True,Nothing)
'**使用双缓存
试试