مقدار پیش‌فرض چند فیلد قابل تغییر با انتخاب از منو

[arman2000]

با سلام

چطور می‌توان برای راحتی و سرعت در ورود اطلاعات، بعد از پر کردن یک فیلد، ورودی آن فیلد، در چند فیلد دیگر نیز وارد شود؟

مثلا تعداد ورود و تعداد خروج، با تعداد تولید برابر باشد که فقط با وارد کردن تعداد تولید، دو فیلد ورود و خروج نیز پر شود.

[Mehr@ban]

سلام

از قابلیت مقدار پیشفرض یا دیفالت ولیو استفاده کنید

[arman2000]

سلام

با این کدها جواب نگرفتم:

PrivateSubenter_AfterUpdate(Cancel AsInteger)

Me.ext.DefaultValue = """"& (Me.prdct) & """"

و یا

PrivateSubenter_BeforeUpdate(Cancel AsInteger)

Me.enter.DefaultValue = """"& (Me.prdct) & """"

منظورتون چه کدی هست؟

[Mehr@ban]

سلام

تسلیت به مناسبت شهادت سردار سپهبد حاج قاسم سلیمانی

خدمت شما

[arman2000]

سلام بزرگوار. ممنونم از راهنمایی شما

اگر بخوام علاوه بر اینکه عدد فیلد "تعداد ورود" برای دو فیلد دیگه در یک رکورد تکرار می شه، در ركوردهاي بعدي هم به صورت پیش‌فرض این سه فیلد، تكرار بشه چی؟ چون اکثرا همین اعداد، برای رکوردهای بعدی هم تکرار می شه

از كد زير برای سه فیلد استفاده كردم ولی در رکودهای بعدی لازم هست حتما دوباره "تعداد ورود" را مجدد وارد کنم تا به دو فیلد دیگه کپی بشه:

Me.enter.DefaultValue = """" & (Me.enter) & """"

که با در نظر گرفتن کدی رو که شما زحمت کشیدید می شه:

Private Sub enter_AfterUpdate()

Me.enter.DefaultValue = """" & (Me.enter) & """"

Me.ext = Me.enter

Me.prdct = Me.enter



End Sub

[Mehr@ban]

این کد رو امتحان کنید:

Private Sub Form_Open(Cancel As Integer)

Me.enter.DefaultValue = DLast("enter", "tbl1388")

End Sub