D.7 フォームへのキーボード入力操作に対応する処理を実行したい

処理: フォームへのキーボード入力操作に対応して、処理を実行するにはどうすればよいでしょうか？

操作方法

フォームのPreKeyDownイベントまたはPreKeyUpイベントに手続きを記述してください。

たとえば、フォームがフォーカスをもっている状態で、[Ctrl+Shift+L]が押された場合に処理を実行するには、以下のように記述します。PreKeyDownイベントとPreKeyUpイベントのパラメタの詳細は、『リファレンス』を参照してください。

◆MainForm-PreKeyUp

    ENVIRONMENT DIVISION.
    DATA DIVISION.
    WORKING-STORAGE SECTION.
    LINKAGE SECTION. 
    01  POW-KEYCODE PIC S9(4) COMP-5.
    01  POW-SHIFT PIC S9(4) COMP-5.
    PROCEDURE	DIVISION.
          DIVISION USING POW-KEYCODE POW-SHIFT. 
                  IF POW-KEYCODE = POW-KEY-L AND POW-SHIFT = 3 THEN
                  … ([Ctrl + Shift + L]キーが押された場合の処理を記述します)
                  END-IF