پرسش [بایگانی] - برنامه نویس

View Full Version : پرسش

razeghi36

شنبه 15 تیر 1392, 18:18 عصر

با سلام , با دستور زیر ردیف انتخابی را کپی می کنیم حال می خوایم قبل از کپی سوالی مبنی بر کپی یا عدم کپی ردیف پرسیده شود ممنون

DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.RunCommand acCmdPasteAppend

G.hemati

شنبه 15 تیر 1392, 20:35 عصر

با سلام
از کد زیر استفاده نمایید

If MsgBoxFa("آیا اطلاعات کپی شود ؟", vbYesNo + vbQuestion + vbDefaultButton2 + vbMsgBoxRight, "توجه") = vbNo Then Exit Sub
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy