饂飩コーディング

iOSアプリやら、Unityやら、Cocos2dやらごにょごにょ書いております

レコード選択画面を作成してみる ダメバージョン

サイトが引っ越しました。→https://scombu.com

約1秒後に自動的にリダイレクトします。切り替わらない場合はリンクをクリックしてください。

f:id:appdeappuappu:20201202224934p:plain
上の商品マスターを使ったデータ抽出画面の作成をしてみましょう。

下のフォームの様に、左上のチェックボックスを外した状態であれば
商品説明1,商品説明2がブランクのレコードも含めて画面に表示し
コンボボックスで絞り込みを可能にします。
f:id:appdeappuappu:20201202225000p:plain
 Like (Nz([Forms]![フォーム1]![cb大分類],"*"))
 Like (Nz([Forms]![フォーム1]![cb中分類],"*"))
 Like (Nz([Forms]![フォーム1]![cb小分類],"*"))
 Like (Nz([Forms]![フォーム1]![cb商品説明1],"*"))
 Like (Nz([Forms]![フォーム1]![cb商品説明2],"*"))

 Like (Nz([Forms]![フォーム1]![cb大分類],"*"))
 Like (Nz([Forms]![フォーム1]![cb中分類],"*"))
 Like (Nz([Forms]![フォーム1]![cb小分類],"*"))
 IS NULL
 IS NULL
チェックボックスFALSEの時のOR条件にすればいいでしょう。



左上のチェックボックスをオンにすると
商品説明1、商品説明2ともにブランクのレコードのみになり
コンボボックスで絞り込みを可能にします。
f:id:appdeappuappu:20201202225514p:plain
Like (Nz([Forms]![フォーム1]![cb大分類],"*"))
 Like (Nz([Forms]![フォーム1]![cb中分類],"*"))
 Like (Nz([Forms]![フォーム1]![cb小分類],"*"))
 IS NULL
 IS NULL
チェックボックスTRUEの時の条件にすればいけます。


上記までの内容をフォームのレコードソースに設定すれば
あとはコンボボックスの集合ソースを適当にグループ化してあげればOK!
f:id:appdeappuappu:20201202225028p:plain



ただ難点は、コンボボックスで選択できる項目
この場合は、大分類、中分類、小分類は何かしらのデータがセットされている
必要があります。
LIKE * では 何かしら文字がセットされているレコードを拾ってくるので
そうなってしまいます。