怎样定义带事件的对象数组.

zodane · 发表于 2007-3-5 22:08:00

RT private withevents class() as class1
出错 , 怎么办呢 .

psic · 发表于 2007-3-5 22:22:00

不能……没办法……

Miu.C · 发表于 2007-3-7 18:47:00

Dim Arr()
Private Sub WithEvent(Index as Long)
Select Case Index
      Case 0
      .....
      Case 1
      .....
End Select
End Sub

zodane · 发表于 2007-3-7 21:06:00

这是什么 ?

也学习者 · 发表于 2007-3-8 14:55:00

类模块

zodane · 发表于 2007-3-8 21:28:00

withevents 是一个关键字 . .

账号		自动登录	找回密码
密码			立即注册

Re:怎样定义带事件的对象数组.