前回までは、単価や日付で検索しましたが、今回は商品の一覧からその明細を抽出して
サンプルフォームを開きます。
先に商品テーブルを作成。
サンプルテーブルに商品CDのフィールドを追加して、該当するコードを入力。
商品テーブルを基に、フォームウィザードでフォームを作成します。
作成後、コマンドボタンを配置します。
このコマンドボタンのイベントタブのクリック時に、次のVBAコードを入力します。
Private Sub コマンド5_Click()
DoCmd.OpenForm “サンプル”, , , “商品CD=” & Me!商品CD & “”
End Sub
実行結果です。
このような形で、商品の一覧から商品を選択しその売上明細を表示させることができます。
一覧からその明細というパターンは非常によく使います。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
土曜日からアレルギー性鼻炎が発症し、ひどい鼻づまり。
原因は、恐らく寒暖差。マラソンのトレーニング中に
暑い状態から、急に激しく冷たい向かい風を受け体温を奪われ、
それに体が対応しきれなかったようです。
やっと治まりましたが、この時期の夕方のトレーニングは
さけたほうがいいかも・・・
本日も最後までお読み頂きありがとうございます。
