111,126
社区成员
发帖
与我相关
我的任务
分享
''' <summary>
''' 释放内存
''' </summary>
Public Shared Sub ClearMemory()
GC.Collect()
GC.WaitForPendingFinalizers()
If Environment.OSVersion.Platform = PlatformID.Win32NT Then
SetProcessWorkingSetSize(System.Diagnostics.Process.GetCurrentProcess().Handle, -1, -1)
End If
emr.lib.msg.Show("清理内存完毕!")
End Sub