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程序中盡可能使用少量的敘述,讓主程式來處理其餘的敘述。