| | | 事件 | | 2001-02-24·
·ADDING··YESKY
| 1 2 下一页 相对来说,事件的使用是比较简单的。在使用前,我们必须先定义该事件,这就意味着通知Visual Basic什么事件被调用。一个事件可能有自己的参数,例如,一个Command按钮有一个Click(单击)事件,它没有参数。另外,文本编辑框有一个KeyPress事件,它通过一个叫"KeyAscii"的值来处理相关内容。
定义一个事件是在一个类的通用声明部分添加类似下面的代码:
Public Event MyEventName(PossArguments As String, Etc As Variant)
然后在代码调用RaiseEvent方法来激发一个事件。就像下面的代码一样:
RaiseEvent MyEventName("PossArgs", "Etc")
为了更好地说明上述添加和激发事件的过程,我们举一个例子。首先,定义一个事件:
在CDog类的通用声明部分添加下列代码:
Public Event Awake()
在CDog类中添加Sleep子过程:
Public Sub Sleep()
Dim i As Long
For i = 1 To 1000000
DoEvents: DoEvents: DoEvents
ext i
RaiseEvent Awake
End Sub
代码中,一开始做一些1000000次无用的循环,计算机短暂停顿后,Sleep子过程激发Awake事件。
1 2 下一页 | | | 感谢
访问天极网,如果您觉得该文章涉及版权问题,请看这里!
|
|