سوال: پیام درتاریخ انقضا کالا [بایگانی]

View Full Version : سوال: پیام درتاریخ انقضا کالا

meli66

پنج شنبه 28 شهریور 1392, 23:14 عصر

باسلام. درنمونه پیوستی میخواهم هرکدام ازکالاهایموجود درسابفرم چنانکه سه ماه به تاریخ انقضاشان بمونه پیامی ظاهر بشهبصورت<< 4 ماه به تاریخ انقضا نام کالا.. مانده>> ورنگ فیلد همان کالا قرمزبشه. ازدوستان
طلب کمک دارم . ممنون

meli66

جمعه 29 شهریور 1392, 10:48 صبح

ازاساتید محترم تقاضای کمک دارم!

meli66

شنبه 30 شهریور 1392, 20:18 عصر

حتما کسی جواب خواهدداد!

saeed1234n

شنبه 30 شهریور 1392, 20:56 عصر

با سلام

دوست عزیز به لینک زیر مراجعه کنید .

http://barnamenevis.org/showthread.php?420287-%D8%B3%D9%88%D8%A7%D9%84&p=1880230&viewfull=1#post1880230

meli66

شنبه 30 شهریور 1392, 23:21 عصر

باتشکر
اشکال این کد چیه که ارور میده

Private Sub Form_Current()
If Me![TKHARID_subform].Form![Text10].Value < 120 Then
Me![TKHARID_subform].Form!Text10.BackColor = vbRed
MsgBox "! ÈÑÑÓí ÔæÏ"
Else: Me![TKHARID_subform].Form!Text10.BackColor = vbWhite
End If
End Sub

saeed1234n

شنبه 30 شهریور 1392, 23:45 عصر

با سلام

دوست عزیز اگر کدتان هم اشکالی نداشته باشد تا زمانیکه سابفرم در حالت دیتاشیت است این دستور کارایی ندارد .

اگر سابفرم در حالت دیتاشیت باشد برای انجام این کار می توانید از conditional formating استفاده کنید .

و اگر سابفرم شما در حالت single form بود کد فوق را در رویداد on current خود سابفرم بنویسید .

111050

meli66

یک شنبه 31 شهریور 1392, 19:16 عصر

ضمن تشکر . آیا در این حالت پیام نیز ظاهر نمیشود؟ درصورت مثبت بودن جواب پس علت اینکه پیام ظاهر نمیشود چیست ؟

saeed1234n

یک شنبه 31 شهریور 1392, 20:10 عصر

با سلام

دوست عزیز خوشبختانه پیغام به نمایش در می آید.

meli66

یک شنبه 31 شهریور 1392, 21:59 عصر

به من که جواب نداد!