Access学习之路_1

    在学习 Access数据库 ，根据教程做一个考勤管理系统 ，在做窗体的时候遇到了一些问题，在网上也没找到答案，不过还好最终解决了，把这个过程记录下来，其实就是一个窗体关闭按钮的VBA代码及其分析，怕自己忘了所以记录下来，不在详细整理了，直接把代码和注释复制过来了。

主要就是涉及到错误处理的过程。我在注释中写了。仔细看应该可以。

Private Sub 关闭窗体_Click()

'错误跳转语句 如果在运行这个过程的时候出现错误 则跳转到GoTo后面标签的那一行  此处标签名字为：Err_关闭窗体_Click

'On Error 语句是用来启动一个错误处理程序 并指定该子程序在一个过程中的位置   同时也可以出来禁止一个已经启动的错误处理程序

'一个“允许的”错误处理程序是由 On Error 语句打开的一个处理程序；一个“活动的”错误处理程序是处理错误的过程中允许的错误处理程序。

On Error GoTo Err_关闭窗体_Click
'关闭窗体的语句
DoCmd.Close

'一直不太清除 Exit_关闭窗体_Click这个用法 是怎么回事 固定的语法结构吗？
'哈哈 找到了  在任何过程中，一旦错误处理程序处理了错误，在当前过程中就会从 Resume 语句指定的位置恢复运行。

Exit_关闭窗体_Click:
Exit Sub

Err_关闭窗体_Click:

'MsgBox Err.Description 用来告诉你错误信息
MsgBox Err.Description

'找到了  在任何过程中，一旦错误处理程序处理了错误，在当前过程中就会从 Resume 语句指定的位置恢复运行。
Resume Exit_关闭窗体_Click

End Sub