vba多个button响应一个事件_在类中定义和触发自定义事件（上）

大家好，我们今天继续讲解类的相关知识。在上一讲中我们讲了使用WithEvents定义响应事件的对象，那么有了对象自然要跟进到事件了，这讲就给大家讲解两个新技能——在类中定义和触发自己的事件（Event）。这两个技能，再加上上讲介绍的WithEvents，这三项技能一旦合体，就会变形成一支神奇的笔，凡是用这只笔创建的类对象，就立刻有了自主意识。这套VBA中类的解读及应用中，侧重点是理论的学习，要求大家在有一定的VBA基础上再开始的学习（这是我的第五部教程，建议大家在掌握前几套教程的内容后再学习这套教程），我也力争用尽可能简单的例子给大家加以辅助的讲解。在这套教程中大家会体会到很多生命或者佛教的点滴，很多事物都是相通的，VBA代码不是枯燥的。

好了，我们继续讲解，在类中如何能自定义一个自己的事件呢？就是利用Event，Event是VBA的又一个关键字，专门用来定义事件。

我们在pigsy类的头部写如下代码：

Public Event BIR()

这样就定义了一个我