PDA

View Full Version : بروز شدن آنی موجودی در یک تکست باکس



parsa70
یک شنبه 25 خرداد 1399, 07:12 صبح
سلام

من یک برنامه مالی دارم مینویسم، وقتی اون تکست باکس که این فرمول رو زدم که از جدول اصلی میخونه، تو فرم ثبت اطلاعات هزینه رو که وارد میکنم میاد موجودی یک فرم قبل تر رو نشان میده (آنی نیست و یک فرم عقب هست)
فرمولی که در دیتا اون تکست باکس وارد کردم این هست.
=Nz(DSum("AmountIncome","tblmain","[kindofincom]=[txtdaramad] And [Accountname]=[txtaccountname]"))-Nz(DSum("AmountIncome","tblmain","[kindofincom]=[txthazine] And [Accountname]=[txtaccountname]"))
و وقتی که در فیلدی که هزینه، را که از نوع عددی هست وارد میکنم، در on exit فرم زدم که تکست باکسی که فرمول خورده رو requery کنه.
Me.Text182.Requery
میخوام اگه بشه موجودی فعلی رو همون موقع که هزینه را وارد میکنم نشان دهد


سپاس

parsa70
یک شنبه 25 خرداد 1399, 22:04 عصر
151851

سلام مجدد
نمونه فایل به پیوست ارسال میگردد.
سپاس

mohammadsaleh
دوشنبه 26 خرداد 1399, 08:58 صبح
از تابع Dsum استفاده کن

parsa70
دوشنبه 26 خرداد 1399, 12:25 عصر
از همون استفاده کردم.
ولی باز یک فرم عقبتر رو نشان میده

parsa70
پنج شنبه 29 خرداد 1399, 22:01 عصر
من از این روش استفاده کردم آنی تو خود فرم بروز میشه موجودی
حالا نمیدونم روش خوبی هست یا نه ولی جواب داد.
تو unload فرم اون قسمت بالا که Private هست رو به public عوض کردم.
و در قسمت on exit یکی از تکست باکس هام این کد رو زدم:
call form_esmeform.refresh