تشخیص تغییر در Text Box

[mohsen1393]

سلام خدمت دوستان و عرض تبریک سال نو
سوال:
چطور میشه تشخیص داد که داخل یک Text Box تغییر اتفاق افتاده ؟
ضمنأ من Event های مربوطه مثل On Cheng و ... رو امتحان کردم اما نشد.
در ضمیمه فایل رو قرار دادم و نحوه کار به این شکل هست : نتیجه شمارش تعداد رکورد های جدول در هر ثانیه در فرم نمایش داده میشه حالا من میخوام به محض این که تعداد رکور ها بیشتر شد
این تغییر تشخیص داده بشه و مثلا یک فرم دیگه باز شه.همین:متفکر::متفکر::متفکر:
با تشکر.

[saeed1234n]

سلام

کد زیر را واردکنید :



Private Sub Form_Timer()
Requery
If Text3 > every_number Then
DoCmd.OpenForm "sample_form", acFormDS
End If
End Sub

[mohsen1393]

سلام

کد زیر را واردکنید :



Private Sub Form_Timer()
Requery
If Text3 > every_number Then
DoCmd.OpenForm "sample_form", acFormDS
End If
End Sub


سلام دوست عزیز
کدی رو که گفتید وارد کردم اما نتیجه مورد نظر حاصل نشد.
دستور بعد از IF بعد از هر با زمان تایمر فرم به شکل مستمر اجرا میشه . در واقع در ازای افزایش عدد در Text Box دستورات اجرا نمیشه:متفکر::متفکر::متفکر:

[amirzazadeh]

نمونه اصلاح شده رو ببينيد.به محض اينكه ركورد جديدي به جدولتون اضافه يا كم كنيد پيامي مبني بر تعداد ركورد جديد نشان داده ميشه.
......................
موفق باشيد

[mohsen1393]

نمونه اصلاح شده رو ببينيد.به محض اينكه ركورد جديدي به جدولتون اضافه يا كم كنيد پيامي مبني بر تعداد ركورد جديد نشان داده ميشه.
......................
موفق باشيد

باسلام و تشکر
مشکل حل شد
یاشاسین آذربایجان