能否为自定义的类定义事件.txt

来自「VB技巧问答10000例 VB技巧问答10000例」· 文本 代码 · 共 14 行

在 类 中 直 接 定 义 事 件 就 成 了 。 
    class名 ： someclass 
    public event someevent(arg1 as sometype) 
     
    public sub somesub() 
     'do something here 
     raiseevents someevent(arg1) 
    end sub 
     
    然 后 在 该 类 的 调 用 者 处 如 下 声 明 ： 
    public withevents ss as someclass 
    就 好 了 。 
<END>