پاس دادن مقدار یک فیلد از فرم اول به فیلدی در فرم دوم در اکسس
سوال :
با سلام، در اکسس 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 نام فیلدی که در فرم دوم مد نظرتان است را بنویسید)
نظرات و پاسخ ها
سارا چگینی نوشته :
چطور ميتونم بدون برنامه نويسي اين كار رو بكنم؟
حسین تبریزی نوشته :
خيلي خيلي ممنون، راهگشا بود .
شاهرخ جمشيدي نوشته :
با درود تشكر از اين ترفند بسيار خوب. من اين كار رو با موفقيت انجام دادم .ولي يك مشكل پيش اومده كه بعداز انتقال رنگ فرم گيرنده قاطي ميشه .راهي وجود داره كه بشه اين مشكل رو بر طرف كرد.خوشحال ميشم اگه كمك شما رو داشته باشم .سپاس
مدیر سایت فارسی میتینگ در پاسخ به شاهرخ جمشيدي نوشته :
دقیقا نمی دونم چه مشکلی بوجود آمده، که بنظرم با تغییر کد یا اضافه کردن متدی مشکل شما هم حل خواهد شد
mojtaba نوشته :
سلام ممنون از راهنمايي كه كرديد بابت پاس دادن مقدار يك فيلد.يك مشكلي كه براي من پيش اومده اين كه اگر فرم از نوع acFormAdd باشه اون مقدار در فرم قرار نميگيره چجوري بايد اين كار انجام بديم.كد من به اين صورت هست.Private Sub Command105_Click()Dim N As StringN = Me!National_Code.ValueDoCmd.OpenForm "frm_Continuous_grades", acNormal, , , acFormAdd, acDialogForms!frm_Continuous_grades!National_Code.SetFocusForms!frm_Continuous_grades!National_Code.Value = NEnd Subو يه مشكل ديگه اگر اطلاعاتي در فرم وارد نشود و فرم را ببنيدم پيغام خطاي vb ميده run time error '2450' ميدهممنون ميشم من راهنمايي كنيد تلفن : 0
مهدی نوشته :
با سلام من این کار را با دبل کلیک بر روی فرم مبدا و ثبت اطلاعات بر روی فرم مقصد انجام دادم سوال: فرم مقصد ساب فرم می باشد و به یک جدول وصل است وقتی مثلا در روی ردیف سوم ساب فرم( فرم مقصد) SetFocus است با دبل کلیک بر روی فرم مبدا( موردی که می خواهیم بر روی فرم مقصد ثبت شود) هر بار فقط ردیف اول فرم مقصد تغییر می نماید . و ردیف سوم بدون تغییر باقی می ماند آیا کدی وجود دارد که اطلاعات برروی بخشی از فرم مقصد که SetFocusاست ثبت گردد. لطفا راهنمائی نمائید. با تشکر
صفحه 2 از 4 
مطالب مرتبط
پیغام conflict در اکسل مشکل به اشتراک گذاری فایل اکسل share workbook نحوه به اشتراک گذاشتن فایل اکسل در شبکه Conficting Changes between users ارتباط با مشتریان Crm نرم افزار تحت شبکه
2014, Tuesday, 18, Feb
شرط گذاری در سلول های اکسل با گزینه Conditional Formatting رنگی کردن سطر و سلول و ستون های اکسل با استفاده از منوی فرمتینگ تب Style پنجره Conditional formating rules manager آموزش اکسل Excel Learning
2016, Friday, 05, Feb
از بین بردن فایل اکسل در تاریخ معین ساخت فایل اکسل دارای تاریخ انقضاء (دوره آزمایشی) Expire Date In Excel ایجاد فایل اکسل با تاریخ انقضاء ایجاد ماکرو VBProject فایل اکسل
2013, Thursday, 30, May
چگونه می توانم برای سند ورد حاشیه گذاری کنم؟ border in word ویرایش متن در سند ورد تنظیم حاشیه و چیدمان در ورد تب Page Layout Page Background گزینه Page Borders
2012, Wednesday, 28, Nov
پاس دادن مقدار یک فیلد از فرم اول به فیلدی در فرم دوم در اکسس دراکسس 2010 بر روی فرم" navigation "دو فرم را باز کرده ام میخواهم دکمه ای ایجاد کنم که با کلیک بر روی آن محتویات یک فیلد از فرم اول در فیلدی از فرم دوم درج شود
2013, Friday, 25, Oct
