程序语言为现代的计算和自动化作出了重要贡献!
能运用程序语言解决现实中的问题,你会发现,其实很多事情真的很方便!
前段时间一直跟他们测量的讲解CASS这个软件,我并没有学过这个软件,但是从它的安装和使用,我发现其实就是基于CAD的一个二次开发!如果有足够的条件,我们也可以开发出类似于CASS这样的软件,甚至比这个功能更强大!以后有机会和大家一起共享CAD二次开发的心得!
在这里给大家介绍在编程中节约内存的一种方法,经过反复测试,发现该程序可以使你的内存节约一半!
其实原理很简单,就是调用API。关于调用API,以后有机会跟大家交流!
代码如下:
Private Declare Auto Function SetProcessWorkingSetSize Lib "kernel32.dll" (ByVal procHandle As IntPtr, ByVal min As Int32, ByVal max As Int32) As Boolean
Public Sub SetProcessWorkingSetSize()
Try
Dim Mem As Process
Mem = Process.GetCurrentProcess()
SetProcessWorkingSetSize(Mem.Handle, -1, -1)
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub
调用
SetProcessWorkingSetSize()
其中"kernel32.dll"是要调用的库。
能运用程序语言解决现实中的问题,你会发现,其实很多事情真的很方便!
前段时间一直跟他们测量的讲解CASS这个软件,我并没有学过这个软件,但是从它的安装和使用,我发现其实就是基于CAD的一个二次开发!如果有足够的条件,我们也可以开发出类似于CASS这样的软件,甚至比这个功能更强大!以后有机会和大家一起共享CAD二次开发的心得!
在这里给大家介绍在编程中节约内存的一种方法,经过反复测试,发现该程序可以使你的内存节约一半!
其实原理很简单,就是调用API。关于调用API,以后有机会跟大家交流!
代码如下:
Private Declare Auto Function SetProcessWorkingSetSize Lib "kernel32.dll" (ByVal procHandle As IntPtr, ByVal min As Int32, ByVal max As Int32) As Boolean
Public Sub SetProcessWorkingSetSize()
Try
Dim Mem As Process
Mem = Process.GetCurrentProcess()
SetProcessWorkingSetSize(Mem.Handle, -1, -1)
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub
调用
SetProcessWorkingSetSize()
其中"kernel32.dll"是要调用的库。