WithEvents
WithEvents
关键字用于下列上下文：
Dim 语句
Private 语句
Public 语句