窗体自动加载问题
hrtc 2006-07-03 11:40:16 vb程序里,一旦窗体上有控件被使用就会自动加载窗体.有时结束应用程序后由于窗体还是被加载所以虽然窗口没了,但任务管理器中还在,不知有什么可行办法,或者禁用自动加载窗体.
例子如下,按了command1后马上关闭窗体,任务管理器中还在,取消注释设个全局锁,但是会发生一些奇怪的事,计算会出错,发现第一次按unload时command1会被取消,这样锁就算错了.
有1种解决办法是加个end但是,end是把所有程序结束,我还有其他程序需要执行,只是单单想关闭这个窗口.这种情况在vb编程中很常见,不知大家怎么解决的?
Private mFlagCanUnLoad As Integer
Private Sub Command1_Click()
'mFlagCanUnLoad = mFlagCanUnLoad + 1
modUtil.waitTime 1'该函数功能是doevents一秒
Randomize (Rnd)
Text1.Text = Rnd
'mFlagCanUnLoad = mFlagCanUnLoad - 1
End Sub
Private Sub Form_Unload(Cancel As Integer)
'While mFlagCanUnLoad <> 0
'DoEvents
'Wend
End Sub