بعد از این کد DoCmd.OpenForm stDocName
اینها رو اضافه کنیدForm_Form21.RecordSource = "SELECT Tb_bar.* FROM Tb_bar WHERE (((Tb_bar.ID)='" & ID & "') AND ((Tb_bar.code)='" & code & "'));"
Form_Form21.Requery
بعد از این کد DoCmd.OpenForm stDocName
اینها رو اضافه کنیدForm_Form21.RecordSource = "SELECT Tb_bar.* FROM Tb_bar WHERE (((Tb_bar.ID)='" & ID & "') AND ((Tb_bar.code)='" & code & "'));"
Form_Form21.Requery
شهر الکترونیک چیزی که همه بهش نیاز دارن و ما ایرانیها از همه نیازمند تر و در عین حال بی تفاوت تر به آن .
قوانین ایجاد تاپیک در تالار
پاسخ با نقل قول