[[FrontPage]]

*フォームで抽出ダイアログを簡単に作る [#je412af9]
-フォームでデータシートを利用するとコマンドボタンなどが使えない。
データシート形式にするには、クエリを呼び出す。

-デザインビューを使用してフォームを作成する
-テキストボックスとコマンドボタンを置く
-コマンドボタンは何も指定せずに「完了」
-コマンドボタンのイベント中に「 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]と入れておく
トップ   編集 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS