Office中国论坛/Access中国论坛

标题: [em06][em06][求助]取消窗体关闭的代码如何写？ [打印本页]

作者: rushing 时间: 2004-8-28 21:16
标题: [em06][em06][求助]取消窗体关闭的代码如何写？
有一窗体，名：APEX，要求在关闭该窗口时检测字段单号是否为空，如果为空则窗口不关闭，提示"你必须输入单号！"，然后将焦点定位于单号字段。

检测部分已完成，现求助取消关闭窗口的代码。

Private Sub Form_Close()

If IsNull(单号) Then

MsgBox "你必须输入单号！", vbExclamation

单号.SetFocus

End If

End Sub

作者: 高处不胜寒 时间: 2004-8-28 23:09
试试CANCEL=TRUE

作者: zyp 时间: 2004-8-29 02:49
把代碼加在ｕｎｌｏａｄ事件中，而不是加在ｃｌｏｓｅ事件中．在程序中再加上樓上的代碼

作者: wuwu200222 时间: 2023-1-20 11:02
学习

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)