hatena
hatena
2020/07/14 (火) 15:04:38
せっかくなので一般的な方法を提示しておきましょう。
テーブル設計は下記のようにします。
M_商品
商品ID 主キー
商品名
MT_単価
商品ID 複合主キー
Max個数 複合主キー
単価
M_商品のデータ例
商品ID | 商品名 |
---|---|
1 | AAA |
2 | BBB |
3 | CCC |
MT_単価のデータ例
商品ID | Min個数 | 単価 |
---|---|---|
1 | 1 | ¥1,000 |
1 | 101 | ¥800 |
1 | 201 | ¥700 |
1 | 501 | ¥600 |
2 | 1 | ¥1,500 |
2 | 251 | ¥1,200 |
フォームのレコードソースのテーブルのフィールドは ID(主キー)、商品ID、単価、個数
個数の更新後処理に下記のコードを設定。
Private Sub 個数_AfterUpdate()
Me.単価.Value = DMin("単価","MT_単価","商品ID=" & Me.商品ID & " AND Max個数 <= " & Me.個数)
End Sub
以上です。
通報 ...