Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (hwnd As IntPtr, wMsg As Integer, wParam As Integer, lParam As IntPtr) As Integer
Private Const WM_SETREDRAW As Integer = &HB
‘禁止刷新
SendMessage(Me.Handle, WM_SETREDRAW, 0, IntPtr.Zero)
‘允许刷新
SendMessage(Me.Handle, WM_SETREDRAW, 1, IntPtr.Zero)
时间: 2024-10-13 14:40:32