EVENT...END EVENT

 
語法

        EVENT ModuleName.EventName()

        {statements}

        END EVENT

 

操作

        宣告一個事件程序。

  • ModuleName – 使用者宣告的事件模組名稱。
  • EventName – 事件名稱。

 

說明

        EVENT指令宣告一個程序，當一個特定的事件發生時會被週邊模組所呼叫。即使沒有參數，括號也不能省略。當宣告事件程序時，事件名稱是由兩個部分組成。第一個部分是模組名稱而第二個部分是事件名稱。兩個名稱由一個點”. ”連接。下面例子顯示事件宣告以及如何啟動事件函數。

Peripheral MyKeypad As KeypadA @ 0

Event MyKeypad.KeyPressed()
    Dim KeyID As Byte
   
    MyKeypad.GetKeyID(KeyID)
    Debug "Key ", KeyID, " is Pressed!", CR
End Event

Sub Main()
    MyKeypad.EnableKeypadEvent()    ' ±Ò°ÊEVENT
    Debug "Press Key Pad.", CR
    Do : Loop
End Sub

 
        當程式在EVENT程序中時，其它事件會被暫停直到EVENT程序執行完畢。強烈建議在EVENT程序中盡可能使用少量的敘述，讓主程式來處理其餘的敘述。