事件声明

EVENT Name ( [ Parameter #1 [ , Parameter #2 ... ] )

声明一个类的事件,使用RAISE关键字可引发该事件。

RAISE关键字可以返回一个布尔值,用来表示事件处理是否取消了该事件。

示例

EVENT BeforeSend(Data AS String)

...

DIM bResult AS Boolean

' Raises the event

bResult = RAISE BeforeSend("MyData")

IF bResult THEN
  PRINT "Canceled !"
ENDIF

事件处理

作为缺省,将 Name_EventName 作为事件发生时事件监听程序调用的方法名称。

例如,如果有一个调用FancyButton的类而且发生调用FancyClick的事件,而且被FMain调用的窗体有名为MyButton的FancyButton 对象,则事件处理方法的声明就像下面这样:

PUBLIC SUB MyButton_FancyClick(...)

缺省的行为可以被改变,就像这样:参见Object.Attach和静态Object 类的另一个方法,除了控件组(其信息应用于任一个发生事件的类)以外,

参见