VB.NET内存占用的解决方法
本篇文章为大家展示了VB.NET内存占用的解决方法,内容简明扼要并且容易理解,绝对能使你眼前一亮,通过这篇文章的详细介绍希望你能有所收获。
创新互联专注于吉首企业网站建设,成都响应式网站建设公司,商城网站制作。吉首网站建设公司,为吉首等地区提供建站服务。全流程按需开发网站,专业设计,全程项目跟踪,创新互联专业和态度为您提供的服务
VB.NET为我们带来了许多新的应用方式和代码编写方式,在一定程度上大大提高了编程人员的编程效率。而且其应用方式多样化,灵活性等特点大大吸引着开发人员。
VB.NET内存占用方法一:将窗体隐藏或者最小化启动
下列VB.NET 2005代码片断通过窗体变量m_IsHide来控制是否将窗体最小化并隐藏,初始化为True。
为了运行下列代码,还需要一个NotifyIcon及一个与之关联的ContextMenuStrip,后者包含mnuShow和mnuHide菜单两枚。
Private m_IsHide As Boolean = True
Private Sub frmMain_Activated() Sub
frmMain_Activated(ByVal sender As
Object, ByVal e As System.EventArgs)
Handles Me.ActivatedIf m_IsHide Then
Me.WindowState = FormWindowState.
MinimizedMe.Hide()
Else
Me.WindowState = FormWindowState.
NormalMe.Show()
End If
End Sub
Private Sub frmMain_Resize() Sub
frmMain_Resize(ByVal sender As Object,
ByVal e As System.EventArgs)
Handles Me.ResizeIf Me.WindowState = FormWindowState.
Minimized Thenm_IsHide = True
Me.Hide()
End If
End Sub
Private Sub mnuShow_Click() Sub
mnuShow_Click(ByVal sender As
System.Object, ByVal e As System.
EventArgs) Handles mnuShow.Clickm_IsHide = False
Me.WindowState = FormWindowState.Normal
Me.Show()
End Sub
Private Sub mnuHide_Click() Sub
mnuHide_Click(ByVal sender As System.
Object, ByVal e As System.EventArgs)
Handles mnuHide.Clickm_IsHide = True
Me.WindowState = FormWindowState.Minimized
Me.Hide()
End Sub
上述代码的功能是:
VB.NET可执行语句示例代码解读
VB.NET创建过程相关步骤详解
如何对VB.NET流进行正确操作
两种VB.NET发送邮件方法解读
VB.NET调用WinAPI实例探讨
1、 启动时最小化并隐藏
2、 点击mnuHide窗体隐藏
3、 点击mnuShow窗体恢复
4、 最小化时窗体隐藏
一句话,其实就是编程使窗体启动时最小化。
VB.NET内存占用方法二:Windows将程序占用的内存倒入虚拟内存可以造成小内存占用的假象。
乐天居上有篇文章“将物理内存的占用挪到虚拟内存里-----揭密篇 ”对此有完整的介绍:“而是操作系统本身就有这个机制,即当程序不使用时(最小化),操作系统会调用某些命令,来将该程序占用的内存移至虚拟内存,只保留一小部分常规代码”
BOOL SetProcessWorkingSetSize( HANDLE hProcess, SIZE_T dwMinimumWorkingSetSize, SIZE_T dwMaximumWorkingSetSize );
“将 2个 SIZE_T 参数设置为 -1 ,即可以使进程使用的内存交换到虚拟内存,只保留一小部分代码。
事实上,使用该函数并不能提高什么性能,也不会真的节省内存。因为他只是暂时的将应用程序占用的内存移至虚拟内存,一旦,应用程序被激活或者有操作请求时,这些内存又会被重新占用。如果你强制使用该方法来 设置程序占用的内存,那么可能在一定程度上反而会降低系统性能,因为系统需要频繁的进行内存和硬盘间的页面交换。”
给出我在vb2005中的使用范例:
Imports System.Runtime.InteropServices
Module modMain Module modMain
< DllImport("kernel32.dll")> _
Public Function SetProcessWorkingSetSize()
Function SetProcessWorkingSetSize( _ByVal hProcess As Integer, _
ByVal dwMinimumWorkingSetSize As Integer, _
ByVal dwMaximumWorkingSetSize As Integer) _
As Integer
End Function
< DllImport("kernel32.dll")> _
Public Function GetCurrentProcess()
Function GetCurrentProcess() As IntegerEnd Function
Public Sub ReduceMem() Sub ReduceMem()
SetProcessWorkingSetSize(GetCurrentProcess, -1, -1)
End Sub
End Module
使用ReduceMem()函数的效果很赞,但是不建议经常用,我只是在FormLoad时用一下,效果就很好了。
值得一提的是,如果不使用GetCurrentProcess()函数得到当前Process,而是使用Process.GetCurrentProcess(),则无法有效缩减使用内存。
上述内容就是VB.NET内存占用的解决方法,你们学到知识或技能了吗?如果还想学到更多技能或者丰富自己的知识储备,欢迎关注创新互联行业资讯频道。
分享题目:VB.NET内存占用的解决方法
URL分享:http://myzitong.com/article/gjpcss.html