Q原木残数を使って、フォームを作ります。このフォームからは今残っている
原木が、
①何日に仕入れたものが何本残っているのか確認する
②新規に仕入れた原木を入力する
この二つの役割があります。
作成タブのフォームウィザードから、Q原木残数を選び、フォームの形式は表形式
を選択して、フォームを作ります。
作ったフォームにテキストボックスを一つ配置します。
「F原木仕入」としてフォームを保存します。
次に上で作ったフォームを日程フォームから開きます。
原木の残数を表示するテキストボックスのプロパティを開き、イベントタブを選択します。
ここでダブルクリック時に次のコードを入力します。
Private Sub テキスト5_DblClick(Cancel As Integer)
DoCmd.OpenForm “F原木仕入”, , , “原木日付<=#” & Me!日付 & “#”
Forms!F原木仕入!テキスト11 = Me!日付
End Sub
このテキストボックスをダブルクリックすると、下の図のように原木の残数が表示
されたフォームが開き、クリックした日付がテキストボックスに転記されます。
このような方法で、現在の在庫数をそれを構成するフォームを表示して
いつ仕入れた材料がどれくらい残っているのか表示することができます。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
昨日ガラケーを買い替えました。もう電源がほとんど入らず、連絡先の移行するときも
なかなか電源が入らなくて、このまま移せないのではないかと心配しましたが、
最後の力を振り絞ってくれて、何とか連絡先を新規のガラケーに移せました。
7年間私の仕事を支えてくれたガラケーに感謝です。
本日も最後までお読みいただきありがとうございます。
