发现一个很奇怪的现象－－关于VB程序的内存占用

我们先看看下面这个简单的程序：
一个form，没有任何控件

Private Sub Form_Load()
Me.WindowState = 1
Me.Hide
End Sub

我们把这个程序稍作修改，加入一个timer控件：

Dim formhide As Boolean

Private Sub hideform()
formhide = True
Me.WindowState = 1
Me.Hide
End Sub

Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
If formhide = False Then
hideform
Timer1.Enabled = False
End If
End Sub

你认为哪个程序占用的内存资源少呢？
大家肯定会说是第一个程序，因为第二个程序用了一个Timer控件来调用hideform这个过程，这绝对是多此一举。一开始我也这么认为。
但事实上第二个程序占用的内存比第一个少！不信你可以试试：
建立两个工程Project1.vbp和Project2.vbp，Project1里是form1，Project2里面是form2
在form2里面加入一个timer控件，然后在form1和form2中分别输入以上代码
编译成Project1.exe和Project2.exe
运行这两个程序打开windows任务管理器，找到Project1和Project2比较一下
我这里测试的结果是Project1占用4096K的内存，而Project2只占用1020K！