欢迎光临:
　　
　　非常感谢您光临枕善居。本站是一个免费的基于VB，VB.NET源代码交流的平台，为大家提供优质的专业的源代码，如果您有需要，本站可以帮助在业余时间里给您寻找代码。当然，如果您有好的代码也可以在本站发布，共享给大家。
专业VB和.NET源码、编程开发教程、图标资源、USB电脑遥控器、智能家电控制开关....更多东东请进入我的淘宝小店--->
VB及.NET新源码2011(3DVD,控件+资源) 智能多路控制(串口编程开关) 带源码!

VB源码 订阅所有【VB源码】的日志
06-04
30

将空闲内存放至虚拟内存的方法

作者:枕善居主 / 查看次数: 7350 / 评论: 4

Private Declare [color=#0000a0]Function SetProcessWorkingSetSize Lib "kernel32" (ByVal hProcess As Long, ByVal dwMinimumWorkingSetSize As Long, ByVal dwMaximumWorkingSetSize As Long) As Long
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long

Private Sub Form_Unload(Cancel As Integer)
    SetProcessWorkingSetSize GetCurrentProcess(), -1&, -1&
End Sub  
[/color]



回复回复zero_yp [2007-05-05 21:23:08 |  | del]
利用程序关闭时的Unload事件，释放程序运行时所占用的内存？ XD
好像是这样的
回复回复rainelf [2006-09-06 00:38:19 |  | del]
引用来自 jjweb 引用来自 jjweb
牛人可以告诉 一下 这个有什么用吗?  释放内存?
回复回复wang102cn [2006-08-27 16:57:41 |  | del]
可以放多少空闲内存到虚拟内存呢？不会造成死机吧？
回复回复jjweb [2006-06-29 10:20:15 |  | del]
牛人可以告诉 一下 这个有什么用吗?  释放内存?
发表评论
您没有权限发表评论！