پاس دادن مقدار یک فیلد از فرم اول به فیلدی در فرم دوم در اکسس
سوال :
با سلام، در اکسس 2010 بر روی فرم" Navigation " دو فرم را باز کرده ام میخواهم دکمه ای ایجاد کنم که با کلیک بر روی آن محتویات یک فیلد از فرم اول در فیلدی از فرم دوم درج شود خواهشمندم مرا راهنمائی فرمائید متشکرم
پاسخ :
این کار را با چند خط کد نویسی می توان انجام داد (مطابق دستورات زیر عمل کنید)
بر روی فرم اول یک Button رسم کنید، سپس از طریق خصوصیات این شی بر روی Event و یا رویداد OnClick کلیک کنید تا به صفحه VBA هدایت شوید، سپس در آن صفحه قسمت آبی رنگ زیر را مشاهده خواهید نمود، باید دستورات برنگ مشکی را در آن بنویسید.
Private Sub Command1_Click()
Dim N As String
N = Me!Nam.Value
DoCmd.OpenForm "Form2"
Forms!Form2!txtTwo.SetFocus
Forms!Form2!txtTwo.Value = N
End Sub
توضیحات کد VBA:
خط اول : یک متغیر از نوع رشته تعریف می کنیم
خط دوم : مقدار فیلد مورد نظر از فرم اول را درون متغیر N می ریزیم (بجای Nam باید نام TextBox را بنویسید)
خط چهارم : با این ستور Form2 فرم دوم را باز کرده (بجای Form2 باید نام فرم دومتان را بنویسید)
خط پنجم : با دستور SetFocus بر روی فیلد مربوط به فرم دوم فوکوس یا متمرکز می کنیم (بجای txtTwo نام فیلدی که در فرم دوم مد نظرتان است را بنویسید)
خط ششم : مقدار N را در داخل فیلد مورد نظر در فرم دوم می ریزیم (بجای txtTwo نام فیلدی که در فرم دوم مد نظرتان است را بنویسید)
نظرات و پاسخ ها
سعید هامین نوشته :
سلام چه كد ساده و كاربردي اي چندتا سايت ديگه هم گشتم ، بعد 20 دقيقه توضيحات اضافي كدشون ناقص بود ممنون از مهر و خوبيتون
حسین نوشته :
سلام
ميخوام يك فرم رو با Button اجرا كنم ولي وقتي روي Button كليك مي كنم اجرا نميشه.
ممنون ميشم راهنمايي كنيد.
نسخه اكسس 2021
كد مورد استفاده
Private Sub Command131_Click()
DoCmd.OpenForm "quality control"
End Sub
مهدی امیراحمدی نوشته :
من ميخوام در فرم اطلاعات پرسنلي به محض وارد كردن نام و فاميل در فيلد فرم بلافاضله نام و فاميل بصورت يكجا در سربرگ همان فرم نشان داده شود.
Reza نوشته :
aya mishe name form ro ham dar in khat DoCmd.OpenForm "Form2 avaz kard
محبوبه نوشته :
من مي خوام شرطي بزارم كه بعد از اينتر پيام موفقيت آميز رو هم به كاربر نشون بده، ميشه راهنمايي كنيد؟
صفحه 1 از 4 
مطالب مرتبط
غیر فعال کردن رویداد کلیک بر روی اسلایدهای ارائه پاورپوینت On Mouse Click هایپرلینک باز کردن اسلایدها از منوی Transition و سپس تب Timing برای همه اسلاید ها یا اسلایدهای مورد نظر خود تیک گزینه On Mouse Click را بردارید
2015, Sunday, 13, Dec
چطوری دراکسس اختلاف دو تا ساعت را بدست بیاوریم؟ محاسبه اختلاف ساعت در اکسس amoozesh mohasebeh ekhtelaf saat dar access بدست آوردن اختلاف ساعت و تاریخ
2015, Thursday, 18, Jun
چرخاندن جدول در Word چگونه می توانم در ورد جدول را بچرخانم؟ روش چرخاندن جدول در Word چرخاندن جدول به اندازه 90 درجه Rotate Table In MicroSoft Word 2007 تبدیل جدول به تصویر چرخاندن متن در ورد charkhandane matn dar word
2013, Wednesday, 10, Apr
روش ترکیب کردن متن انگلیسی با ترجمه فارسی اجرای ماکر برنامه نویسی VBA فرمت دارای قابلیت اجرای Macro ایجاد Madual ماژول اجرای کد ترکیب سطرهای دو فایل ورد فایل اکسل comine rows in excell
2013, Wednesday, 24, Jul
کاربر گرامی سوالات خود را در زمینه نرم افزارهای ورد اکسل اکسس پاورپوینت اینترنت و سیستم عامل ویندوز از منوی تماس با ما ارسال نمائید، تا در اولین فرصت پاسخ داده شود pasokh be soalat
2012, Friday, 15, Jun
