.NETでメモリ消費する！

bantou 2003-12-27 02:47:24 No: 81181

[OSのVer]：Windows [VBのVer]：VB.NET

フォーム上に
・メニュー
MainMenu×１
MenuItem×２
・ラベル×２
・ボタン×１

というレイアウトを配置して、ボタンが押されたら以下の処理を行います。
↓コードです。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles Button1.Click
Dim TotalMem1, TotalMem2 As Long
Dim i As Integer

TotalMem1 = GC.GetTotalMemory(True)

For i = 1 To 1000
MenuItem1.Enabled = False
MenuItem1.Enabled = True
Next

TotalMem2 = GC.GetTotalMemory(True)

'変化量を表示
Label1.Text = CStr(TotalMem2 - TotalMem1)

'トータルを表示
Label2.Text = CStr(TotalMem2)

End Sub
↑ここまで。
実行して何回もボタンを押すと、GetTotalMemoryで取得した値が増大していきます。
MenuItem以外のコントロールでは増大はしません。
一体何が原因でしょうか？