List 7-78　FormProductフォームのBTN_CHKSTOCK_Clickプロシージャ

---

  1： Private Sub BTN_CHKSTOCK_Click()
  2：     ' ［在庫調査］ボタンが押されたときの処理
  3：     FormChkStock.ShowWindow g_objRec.Fields("ID").Value, _
   　                             g_objRec.Fields("PRODUCTNAME").Value
  4： End Sub