問題描述:
語法是怎樣的呢？謝謝＠
解析:
Event 語句
定義用戶自定義的事件。
語法[Public] Event procedurename [(arglist)]
Event 語句包含下面部分：
部分 描述
Public 可選的。指定該 Event 在整個工程中都是可見的。缺省情況下 Events 類型是 Public。應註意，事件只能在所聲明的模塊中產生。
procedurename 必需的。事件的名稱；遵循標準的變量命名約定。
arglist 參數的語法及語法的各個部分如下：
[ByVal | ByRef] varname[( )] [As type]
部分 描述
ByVal 可選的。表示該參數是按值傳遞的。
ByRef 可選的。表示該參數是按地址傳遞的。ByRef 是 Visual Basic 的缺省設置。
varname 必需的。代表要傳遞給過程的參數變量的名稱；遵循標準的變量命名約定。
type 可選的。指傳遞給過程的參數的數據類型；可以是 Byte、布爾、Integer、Long、Currency、Single、Double、Decimal（目前尚不支持）、Date、String（只支持變長）、Object、Variant、用戶定義類型或對象類型。
說明
事件被聲明之後，就可以使用 RaiseEvent 語句來產生該事件。如果在標準模塊中出現 Event 聲明，就會產生語法錯誤。不能聲明帶返回值的事件。在下面的代碼段中，給出了聲明事件和產生事件的典型事件：
'在類模塊的模塊級中聲明壹個事件
Event LogonCompleted (UserName as String)
Sub
RaiseEvent LogonCompleted("AntoineJan")
End Sub
註意 可以象聲明過程的參數壹樣來聲明事件的參數，但有以下不同：事件不能有帶命名參數、Optional 參數、或者 ParamArray 參數。事件沒有返回值。
參考MSDN