Form Form1 {
 X = 0;
 Y = 0;
 Width = 420;
 Height = 231;
 
 SSpread SSpread1 {
  X = 15;
  Y = 12;
  Width = 374;
  Height = 194;
  MaxCols = 5;
  MaxRows = 10;
  AllowColMove = $True;
  
  Number c;
  /*BeforeColMoveイベント内*/
  Function OnBeforeColMove( e ) { 
   /*移動先列の最終行の値を取得*/
   var a = getText(e.ColDest,Maxrows);
   c = e.ColDest;
   setTimer(1,$True);
   MessageBox("イベント内で取得 : "+a);
  }
  
  /*BeforeColMoveイベント発生から1秒後*/
  Function OnTimer( e ) {
   /*移動先列の最終行の値を取得*/
   var b = getText(c,Maxrows);
   MessageBox("イベント発生から1秒後に取得 : "+b);
  }
 }
 
 if ( !$DESIGNTIME ) {
  /*値セット*/
  for(var x=1;x<= SSpread1.MaxCols;x++){
   for(var y=1;y<= SSpread1.MaxRows;y++){
    SSpread1.SetText(x,y,str(x)+"-"+str(y));
   }
  }
 }
}