ACCESS2003でクエリを使った検索フォームを作っています。

質問

ACCESS2003でクエリを使った検索フォームを作っています。

クエリは以下の様になっています。
----------

　番号　　　タイプ　　　品名
　1111　　　AA　　　　 商品1
　2222　　　AA　　　　 しょうひん2
　3333　　　BB　　　　 商品しょうひん3
----------

品名のフィールドの抽出条件に
----------
Like "*" & [Forms]![品名検索フォーム]![品名検索] & "*"
----------
と入れています。

品名検索フォームは帳票タイプで、フォームヘッダーにテキストボックスを設け
「品名検索」と名前をつけています。

テキストボックスに【商品】と入力すれば番号1111と3333が、【しょうひん】と入力すれば
番号2222と3333が抽出されるように設定し、ここはうまく動きました。
ただ、このフォームを開いた際、テキストボックスは空欄になっているため、全レコードが
表示されてしまいます。テキストボックスが空欄の際は、何も表示したくないのですが
どこを触ればいいのでしょうか？

どうかよろしくお願いいたします。

回答No.4

piroin654 · ベストアンサー

#2です。品名のフィールドの抽出条件の設定を変更してください。

Like "*" & [Forms]![品名検索フォーム]![品名検索] & "*" AND [Forms]![品名検索フォーム]![品名検索] Is Not Null

これで品名検索に何も入っていないときはデータは表示
されず、品名検索にデータが入っているときはデータが
表示されます。

お礼

2度の回答ありがとうございました。
こちらにアドバイスいただいた条件でうまくいきました。
本当にありがとうございました。

回答No.3

layy

品名検索テキストボックスに入力が終わった時表示されますか。入力が終わって検索ボタン押すことで表示してますか。

検索画面ですから、検索項目に何か入れるし表示するのが目的。事前に空欄チェックするのがいいと思います。
空欄であるかチェックしてから、検索ボタンが押せるようになり、表示する仕掛け、にするのはどうですか。

フォーム開くと表示されるというのも、表示されない条件でクエリ実行し０件とさせる無駄な処理になるようならクエリ自身しない方が良いでしょう。

品名検索に何か入力された時だけ、の判定追加を考える。

お礼

ありがとうございます。
入力後Enterで表示されるようになっています。
本来なら、ご指摘いただいたような仕組みで作るのがスマートなのでしょうね。
今後の課題とします。ありがとうございました。

回答No.2

piroin654

抽出条件を以下のようにしてみてください。

Is Null or Like "*" & [Forms]![品名検索フォーム]![品名検索] & "*"

回答No.1

chupark

品名検索に何も入力していないときには抽出結果をなしにしたい、ということでしょうか。

抽出条件を、

IIF(IsNull([Forms]![品名検索フォーム]![品名検索]),"",Like "*" & [Forms]![品名検索フォーム]![品名検索] & "*")

などとしてみてはいかがですか？

お礼

ありがとうございました。

補足

ありがとうございました。
早速やってみました。確かに空白時には抽出結果無しになったのですがテキストボックスに
検索文字を入れても何も表示されなくなりました。

iif関数を入力して、一旦保存し閉じたクエリを開いてみると

IIF(IsNull([Forms]![品名検索フォーム]![品名検索]),"",([品名クエリ].[品名]) Like "*" & [Forms]![品名検索フォーム]![品名検索] & "*")　　　　　　

というようにクエリ名とフィールド名が自動的に付加されてました。
これは問題ないのですよね？　というか勝手についてしまうので・・・

何も表示されなくなることについて、何か考えられることはありますか？
何度もすみません。お時間ありましたらよろしくお願いいたします。