/* フォーカスの当たっているオブジェクトを格納 */
  Array obj_info;
  
  /* フォーカスが当たっているオブジェクトをラベル表示*/
  Function OnGetFocus ( e ) {
      /* イベント発生元オブジェクトのリファレンスを格納 */
      obj_info[0] = e.from;
      
      /* ラベル初期化 */
      Label3.Clear();
      
      /* オブジェクト名をラベル表示 */
      Label3.value = obj_info[0].name;
      
      /* フォーカスが当たっているオブジェクトがTextBoxの場合 */
      if( obj_info[0] instanceOf TextBox ) {
          obj_info[0].Value = "GetFocus";
          obj_info[0].bgColor = $RED;
      }
  }