Form Form1 {
    Number tabFormNum = 4;   /* TabFrame内のTabFormの数 */

    TabFrame TabFrame1 {

        TabForm TabForm1;
        TabForm TabForm2;
        TabForm TabForm3;
        TabForm TabForm4;
    }

    Function OnKeyDown( e ) {

        /* →矢印キーが押下された場合、TabFrameのValueを-1 */
        if ( e.key == "RIGHT" ) {
            if ( TabFrame1.Value < tabFormNum - 1 ) {
                TabFrame1.Value++;
            } else {
                TabFrame1.Value = 0;
            }
        }

        /* ←矢印キーが押下された場合、TabFrameのValueを-1 */
        if (e.key == "LEFT") {
            if ( TabFrame1.Value > 0 ) {
                TabFrame1.Value--;
            } else {
                TabFrame1.Value = tabFormNum - 1;
            }
        }
    }
}