为何不能制作子程序?或者添加在循环里也不行?尤其是前两行语句。
那么,是不是,前两行”声明“定义一次就够了,然后,把第三行“运行释放系统内存命令“任意插入到适当循环里或子程序里?
//声明SetProcessWorkingSetSize这个Windows API,用于设置操作系统实际划分给进程使用的内存容量
Declare Function SetProcessWorkingSetSize Lib "kernel32" (ByVal hProcess As Long, ByVal dwMinimumWorkingSetSize As Long, ByVal dwMaximumWorkingSetSize As Long) As Long
//声明GetCurrentProcess这个API,来获取当前进程的一个伪句柄
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
//运行释放系统内存命令
SetProcessWorkingSetSize GetCurrentProcess(),-1,-1