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
以上です。
通報 ...