４章 カスタマイズ ／４-3フォーム

Sora編集フォームにする

編集フォームにすることができます。

＜操作手順＞
  1. 帳票フォームを作成する
    リボンの［Soraツール］の［Soraシステム管理］−［Soraフォーム処理］をクリックします。
    ［Soraフォーム処理］画面の［新規作成］をクリックします。
    ［フォームの新規作成］画面で”オートフォーム表形式”を選択し、［基になるテーブル/クエリーを選択］を設定し、［OK］をクリックします。
  2. Soraフォームに変換する
    ［ツール］バーの［表示］−［デザインビュー］でフォームをデザインで開きます。
    リボンの［Soraツール］の［Soraシステム処理］−［デザインSoraフォーム作成］をクリックし、Soraフォームに変換します。
  3. 関数をイベントに設定する
    フォームのイベントに下記内容を設定します。
    1. ［読み込み時］イベント
      下記内容を追加します。
      apFKeySetList "テスト番号" 'リスト編集フォーム（ファンクションキー情報セット）
      "テスト番号"は自動採番させる項目名です。
      Private Sub Form_Load()
    apFKeySetList "テスト番号"  'リスト編集フォーム（ファンクションキー情報セット）
    apFrmLoad Me
End Sub
    2. ［閉じる時］イベント
      下記内容を追加します。
      apFKeyInfoSet 'リスト編集フォーム（ファンクションキー復帰）
      Private Sub Form_Close()
    apFrmClose Me
    apFKeyInfoSet  'リスト編集フォーム（ファンクションキー復帰）
End Sub
    3. ［閉じる時］イベント
      下記内容を追加します。
      apLstKeyDown Me, KeyCode, Shift 'リスト編集フォーム
      下記内容を削除します。
      apFrmKeyDown Me, KeyCode, Shift
      Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    apLstKeyDown Me, KeyCode, Shift 'リスト編集フォーム
'    apFrmKeyDown Me, KeyCode, Shift  '＜＝コメントにする
End Sub