پاس دادن مقدار یک فیلد از فرم اول به فیلدی در فرم دوم در اکسس
سوال :
با سلام، در اکسس 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
فهرست کردن مطالب یا عناوین پایان نامه بصورت خودکار فهرست پایان نامه بهم ریختگی فهرست فهرست خودکار منوی Refrences تب Table of Contents پایان نامه Update Table فهرست گذاری
2013, Tuesday, 28, May
میخواهم windows راعوض کنم درهمان مراحل اولیه(windows is loading file) گیرمیکندوهیچ کاری انجام نمیدهدسی دی هم پس از15ثانیه ازگردش می ایستدوچراغ درایورهم خاموش میشود
2012, Thursday, 25, Oct
چطوری دراکسس اختلاف دو تا ساعت را بدست بیاوریم؟ محاسبه اختلاف ساعت در اکسس amoozesh mohasebeh ekhtelaf saat dar access بدست آوردن اختلاف ساعت و تاریخ
2015, Thursday, 18, Jun
نحوه ذخیره فایل صوتی در پاور پوینت بصورت مستقل ذخیره صدا در پاور پوینت powerpoint ساخت اسلاید شو صدای پیش زمینه ذخیره فایل صوتی بدون مسیر فایل صوتی نرم افزار پاور پوینت Sound Options Media Clips
2012, Monday, 13, Aug
