Access实现在退出系统前提示用户

2016-02-19 19:07 9 1 收藏

下面请跟着图老师小编一起来了解下Access实现在退出系统前提示用户,精心挑选的内容希望大家喜欢,不要忘记点个赞哦!

【 tulaoshi.com - 编程语言 】

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

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

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

Private Sub Form_Load()
     Me.Visible = False
End Sub

(本文来源于图老师网站,更多请访问https://www.tulaoshi.com/bianchengyuyan/)

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

来源:https://www.tulaoshi.com/n/20160219/1620032.html

延伸阅读
简介 如果你是一名Microsoft Office老手,那么你可能对于Word、PowerPoint和Excel的加密功能非常熟悉。所有的这些程序都让文件所有者能够通过使用简单密码快速轻松的对文件加密。不过,Access没有提供类似的功能,不过它有其他方面相对严密的功能设置能够保证数据库的安全。本文,将为大家介绍Access的用户级安全特性,这是让你可以...
在声明区中声明如下(在.bas档中用Public,在Form中用Private) PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"(ByValhWndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByValnShowCmdAsLong)AsLong 在程序中 Intranet: Sh...
现在的文档很多都是用Word软件来编辑的,但如果你想在程序中把某些字符插入到Word文档中,那么下面的程序帮你忙: procedure TForm1.Button1Click(Sender: Tobject);var MSWord: Variant;beginMSWord := CreateOLEObject(Word.Application);//连接WordMSWord.Documents.Open(FileName:=d:\test.doc, ReadOnly:=True);//打开外部Word...
标签: 电脑入门
要实现在硬盘上引导WinPE,必须包含以下三个文件AVLDR.PE PELDR WINNT.SIF,并且跟PE镜像文件一起复制到C盘再改boot.ini文件后重启才能出现WinPE启动菜单。 下面来说说它们各自都有些什么作用: 1、AVLDR.PE是计算机启动时载入的文件,文件中有1条数据为PELDR的文件名。 2、PELDR是PE启动载入程序,文件中有7条数据为PE的系统目录名,要根据...
Access 系统表 MsysObjects 包含了数据库对象列表, 尽管未在文档中记载, 你仍可通过查询它来获取你想要的. 注: 请不要有意或无意地修改任何ACCESS系统表,否则会出现不可意料的情况. 使用下列 SQL 语句来获取你想要的 查询: SELECT MSysObjects.Name FROM MsysObjects WHERE (Left([Name],1)"~") AND (MSysObjects.Type)=5 ORDER BY MSysObj...

经验教程

915

收藏

61
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部