如何在退出整个系统前提示用户

2008-02-23 08:05:01来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

很简单,建立一个窗体,名字叫隐藏,并在启动选项内选定这个窗体为启动时自动打开。

然后在窗体的加载事件内加入如下代码:

以下为引用的内容:

Private Sub Form_Load() Me.Visible = FalseEnd Sub 站.长站

'在窗体的卸载事件中加入如下代码:Private Sub Form_Unload(Cancel As Integer) If MsgBox("你真的要退出吗?", vbYesNo vbQuestion, "请确认…") = VBNo Then Cancel = TrueEnd Sub 中.国站长站

中.国站长站

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:Access数据库与SQLserver2000的数据互导

下一篇:通过查询返回数据库对象的名称