อยากสร้างคำสั่งตัดสต๊อกให้มันสามารถตัดสต๊อกได้ครั้งเดียวค่ะ อาจารย์
Posted: Thu Oct 13, 2016 1:05 pm
Code: Select all
Private Sub cut_stock_Click()
DoCmd.SetWarnings (0)
DoCmd.OpenQuery ("Q_cut")
DoCmd.SetWarnings (1)
MsgBox (" µÑ´_stock_àÃÕºÃéÍ ")
DoCmd.Save
DoCmd.OpenReport ("Query_bill_ST_cut"), acViewPreview
End Sub