【Access】説教・お勧めなしでお願いします【VBA/SQL】

質問

「検索ダイアログ」フォームに「結果ペイン」帳票サブフォームを作っています。
フォームには「ローカス・タイプ」テキストボックスと「検索」ボタン、
サブフォームには「氏名」テキストボックス、「好きな食べ物」テキストボックス、「好きな生物」テキストボックスがあります。

ローカス・タイプを入力の上ボタンを押すと、
「被験者」テーブルの「ローカス」フィールドをローカス・タイプの一致で検索して、
一致したレコード (複数になる場合、1件になる場合、該当しない場合があります) の
「名前」フィールドの値はそのまま「氏名」テキストボックスのもとに、
「食べ物」フィールドの値は「好きな食べ物」テキストボックスのもとに、
「動物」フィールドと「植物」フィールドの値は「好きな生物」テキストボックスのもとに「動物は[動物フィールド値]で植物は[植物フィールド値]」の形で
ずらっと一覧表示させたいのです。
一致が1件もなかった場合は、全レコードの該当フィールドを上記と同じように一覧表示させたいと思います。

これをVBA/SQLで実現させたいのです。

ここはボランティアであっても、ポイントをつける可能性があるので、完全ボランティアではないと思います。「なんでそんなときこそクエリを使わないのか」とか「自分で勉強するのが嫌ならお金出して外注すれば？」いうのはご勘弁ください。よかれと思って言っているのかもしれませんが、誰でも専門外のことを勉強したり、それに高いお金を払ったりすることが必須なのでしょうか。たとえば、私にも専門分野がありますが、私はその分野で門外漢の人が質問しても、「自分でどこまで調べた？」などと意地悪したりしません。散々文句をつけられた挙句、希望の解決に至らないので、少々辟易しています。

回答No.5

xcrOSgS2wY

「あんなに説教しといてイヤミのつもりか？」と書かれるんじゃないかと内心恐々としていましたが、ホッとしました。（抑えてくださったのだと思っています。）
補足欄としてどうぞ。

回答No.4

xcrOSgS2wY

その後進展はありましたでしょうか。よろしければ補足追加用にご利用ください。
（新たな回答がないと質問者が補足を追加できないというシステムは不便ですね。）

補足

それが解決していないのです。
解決しないのに問題点だけは増えてきました。
ただ、個人がやってる掲示板は、ほとんどどこでも、管理人でもない常連で「丸投げ質問禁止」などと小姑みたくうるさい奴がいるので、もう質問したくないのです。
先に書きましたが、専門外の分野なのに、そいつらと同じくらい知識を持つまで勉強するつもりなんてサラサラありません。
こういう掲示板っていうのは、門外漢が専門分野の人にたずねられるところに意味があるんです。
ああいうのの主張って、みんなが一人ひとり、あまたある専門分野それぞれで勉強しなさい、つってるのと同じで、おかしなことなんです。
またよければ、補足欄を作ってください。

回答No.3

xcrOSgS2wY

質問者さんの2つ目の補足で、どのような疑問点があるのかは了解しました。

お手数をおかけした挙句ではありますが、質問者さんがお望みの条件下で、質問者さんに納得していただけるような回答を行うことは私の能力ではできそうにありません。疑問点がいくらか明らかになったことでもありますし、回答は識者の方にお譲りしたいと思います。

なぜできないと判断したのか、その背景の説明はかなり説教くさくなるので省略させていただきます。万一、質問者さんが「まぁ聞いてやってもいいかな」という気分になられましたら、回答への補足等で教えてください。

補足

以下は回答いただける方に向けてです:

「検索」ボタンの「クリック」イベントで、VBAのイベントプロシージャまでこぎつけました。

Private Sub 検索_Click()

End Sub

ここで何を記述すればよいかを教えてください。「～をする－」などではなく、具体的な式や関数をお願いします。

回答No.2

xcrOSgS2wY

補足説明ありがとうございます。

さて、少々回り道になりますが、「質問」を辞書で引きますと「疑問点やわからない点を問いただすこと」とあります。

いただいた補足説明の文章では「やりたいこと」（最終的に実現したいこと）は述べられていますが、その文章の中のどの部分が疑問点なのかは明確になっていません

回答No.1で書きました「（疑問点を）明確にしていただければ回答しやすい」というのは、例えば、いただいた補足説明の最後に「・・・このうちほとんどの部分はできたのですが、一致が1件もなかった場合の処理の方法が分かりません。」と続くのか、「・・・検索の元になるテーブルは入力し終えたのですが、フォームの作り方が分かりません。」と続くのか、それとも「・・・しかし、実現方法が全く分かりません。実現できるようなプログラミングの基礎を学ぶ参考書を教えてください。」と続くのか、といったところを明らかにしていただければ回答しやすいという意味です。

もちろん、どの部分がよく分からないのかも分からない、ということもあり得ます。それはそれで悪いことではありません。その場合は、「どこが分からないのかもよく分からない」と正直に書いていただければ、不明点を明確にするための質問（補足要求）をすることもできます。

なお、そういった際に回答者はえてして、例えば「クエリを使えばすぐできるのに」と思ってしまい、そしてそのまま「クエリを使えばいいのでは？」などと書いてしまいがちなのですが、それは別に質問者に何か挑戦を投げかけているのでも文句を言っているのでもなく、単に不明点の1つ（使用しない理由）を確認しているだけですので、ご存知なければ「それはどういうもので、どう使えばよいのでしょうか」程度に続けていただけばよいのではないかと思います。

参考URL：

http://dictionary.goo.ne.jp/search.php?MT=%BC%C1%CC%E4&kind=jn

補足

先述のことを実現させるために、あらゆる部分がわからないのです。そのあらゆる部分を教えてほしいのです。

でも、ひとつずつ順を追ってでもよいのです。

したがって、最初に何をしなければいけませんか。先述の部分だけすでに用意しています。

回答No.1

xcrOSgS2wY

やりたいことの内容は拝見いたしました。で、質問として投稿されているからには何か分からないことがあるのだと想像しますが、やりたいことの内容のうちどの部分が分からないことでしょうか。明確にしていただければ回答しやすいかと思います。（文面から察するところ、これもきっと説教だと思われてしまうのでしょうね。）

もしかしたらボランティア云々の部分が質問でしょうか。そうだとすれば、その中に1つ明らかに回答できることがあるので付記しておきます。

報酬を受け取るとボランティアではないとお考えのようにお見受けしますが、それは非常によくある誤解です。施しはボランティアの一種ですが、ボランティアがすべて施しとは限りません。

補足

質問は、以下の部分です:

「検索ダイアログ」フォームに「結果ペイン」帳票サブフォームを作っています。
フォームには「ローカス・タイプ」テキストボックスと「検索」ボタン、
サブフォームには「氏名」テキストボックス、「好きな食べ物」テキストボックス、「好きな生物」テキストボックスがあります。

ローカス・タイプを入力の上ボタンを押すと、
「被験者」テーブルの「ローカス」フィールドをローカス・タイプの一致で検索して、
一致したレコード (複数になる場合、1件になる場合、該当しない場合があります) の
「名前」フィールドの値はそのまま「氏名」テキストボックスのもとに、
「食べ物」フィールドの値は「好きな食べ物」テキストボックスのもとに、
「動物」フィールドと「植物」フィールドの値は「好きな生物」テキストボックスのもとに「動物は[動物フィールド値]で植物は[植物フィールド値]」の形で
ずらっと一覧表示させたいのです。
一致が1件もなかった場合は、全レコードの該当フィールドを上記と同じように一覧表示させたいと思います。

これをVBA/SQLで実現させたいのです。