事件是一种对象可以辨认的动作，如单击鼠标，按下某个键等。可以为某个事件编写一段VBA代码，以便在事件发生时执行指定的动作。这样的代码称为事件响应代码。 下面是事件响应代码的一个例子
新建一个窗体，放置两个按钮和一个文本框控件。按钮的名称分别定义为“corn显示”、“corn清除”，按钮的标题分别定义为“显示”、“清除”，文本框的名称定义为“txt你好”。文本框配套的标签的标题(Caption属性的值)设置为“欢迎：”。
在窗体模块中输入以下代码：
【注】：单引号(’)之后的文字为注释性的文字。
()ption Compare Database
Private Sub com清除一click() ‘“corn清除”按钮的单击事件
Me．txt你好．Set，F13CUS ’调用SetFocus方法，使文本框具有焦点
Me．txt你好．Text=”” ’设置文本框的Text属性为”’(空)，即清除其表面上的
文字
End Sut) ’结束过程
PriVate Su[)corn显示一(2lick() ‘“corn显示”按钮的单击事件
Me．txt你好．SetFocus ’调用SetFocus方法，使文本框具有焦点
Me．txt你好．Text：一”您好!欢迎您学习VBA” ’使文本框显示一段文字
End Sub ’结束过程
Private Sub For‘m Load() ’窗体加载事件
Me．Caption=”欢迎!” ’使窗体的标题(capt：i‘on属性)为“欢迎!’’
End Sub
【注】：Me关键字是隐含声明的变量，适用于类模块中的每个过程。当类有多个实例时，Me在代码正在执行的地方提供引用具体实例的方法。
| 
