# Re: 注意 DoEvents

Posted by Evan on June 24, 1998 at 20:29:58:

In Reply to: Re: 注意 DoEvents posted by Eric Liu on June 24, 1998 at 14:14:05:

:
: : 你的第一个问题有些奇怪。如果程式真的只有那样少少几行的话，是不可能发生这种现象的。

: : 唯一的可能就是你在储存资料的程式有使用到 DoEvents，如果你有用到 DoEvents 的话，在你程式储存中将有可以触发多次的 cmdOK_Click，或是 Unload Me 之后仍有程式在执行，导致 Form 会延迟 unload。这点请你检查一下。

: 如你所说 果然是 DoEvents 造成的不过想再请教
: 我曾把 Me.Enable 设成 False 但无效

: Private Sub CmdOk_Click()
: Me.Enabled=False
: If SaveData = 0 Then
: Unload Me
: Else
: Me.Enabled=True
: End if
: End Sub

: 照理说在 SaveData 中即使有 DoEvents 可
: 储存多次的 "cmdOK_Click" Event
: 但这些 Event 遇到 Me.Enable = Fasle 也应该无效
: 怎么还是会触发

笨静宛耶..
你要不要用 ctrl_break 再用 ctrl_L 去看看发生了
那些event 啊..^^
Evan..

Follow Ups: