Access2000 Tips

FrontPage

フォームで抽出ダイアログを簡単に作る †

• フォームでデータシートを利用するとコマンドボタンなどが使えない。 データシート形式にするには、クエリを呼び出す。

• デザインビューを使用してフォームを作成する
• テキストボックスとコマンドボタンを置く
• コマンドボタンは何も指定せずに「完了」
• コマンドボタンのイベント中に「 DoCmd?.OpenQuery? "入手年クエリ"」を追加 例

  Option Compare Database
  
  Private Sub コマンド2_Click()
  On Error GoTo Err_コマンド2_Click
  
      DoCmd.OpenQuery "入手年クエリ"
  
  Exit_コマンド2_Click:
      Exit Sub
  
  Err_コマンド2_Click:
      MsgBox Err.Description
      Resume Exit_コマンド2_Click
      
  End Sub

• 入手年クエリを作っておく
• 抽出条件に[Forms]![入手年検索]![テキストボックス1]と入れておく