[C#][VB.NET]壓縮.NET程式的記憶體用量

May 22, 2009

.csharpcode, .csharpcode pre { font-size: small; color: black; font-family: consolas, “Courier New”, courier, monospace; background-color: #ffffff; /white-space: pre;/ } .csharpcode pre { margin: 0em; } .csharpcode .rem { color: #008000; } .csharpcode .kwrd { color: #0000ff; } .csharpcode .str { color: #006080; } .csharpcode .op { color: #0000c0; } .csharpcode .preproc { color: #cc6633; } .csharpcode .asp { background-color: #ffff00; } .csharpcode .html { color: #800000; } .csharpcode .attr { color: #ff0000; } .csharpcode .alt { background-color: #f4f4f4; width: 100%; margin: 0em; } .csharpcode .lnum { color: #606060; }]]> 範例程式範例界面範例程式碼VB.NETPublic Class Form1 #Region “Declare” Private Declare Auto Function SetProcessWorkingSetSize Lib “kernel32.dll” (ByVal procHandle As IntPtr, ByVal min As Int32, ByVal max As Int32) As Boolean#End Region #Region “Private Method” Private Sub CompressMemory() SetProcessWorkingSetSize(Process.GetCurrentProcess().Handle, -1, -1) End Sub#End Region #Region “Event Process” Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click CompressMemory() End Sub#End RegionEnd Class<![CDATA[

.csharpcode, .csharpcode pre { font-size: small; color: black; font-family: consolas, “Courier New”, courier, monospace; background-color: #ffffff; /white-space: pre;/ } .csharpcode pre { margin: 0em; } .csharpcode .rem { color: #008000; } .csharpcode .kwrd { color: #0000ff; } .csharpcode .str { color: #006080; } .csharpcode .op { color: #0000c0; } .csharpcode .preproc { color: #cc6633; } .csharpcode .asp { background-color: #ffff00; } .csharpcode .html { color: #800000; } .csharpcode .attr { color: #ff0000; } .csharpcode .alt { background-color: #f4f4f4; width: 100%; margin: 0em; } .csharpcode .lnum { color: #606060; }]]> C#using System;using System.Collections.Generic;using System.ComponentModel;using System.Data;using System.Drawing;using System.Linq;using System.Text;using System.Windows.Forms;using System.Runtime.InteropServices;using System.Diagnostics; namespace WindowsFormsApplication1 { public partial class Form1 : Form { [DllImport (“kernel32.dll”)] static extern Boolean SetProcessWorkingSetSize(IntPtr procHandle, Int32 min, Int32 max) ; public Form1() { InitializeComponent(); } private void CompressMemory() { SetProcessWorkingSetSize(Process.GetCurrentProcess().Handle, -1, -1); } private void button1_Click(object sender, EventArgs e) { CompressMemory(); } } }<![CDATA[