رفتن به رکورد خاص در یک سابفرم

[hamid-nice]

با سلام
در یک فرم یک تکست باکس با نام TXT1 و یک سابفرم با نام sub1 دارم که در نمای Datasheert قرار داره ،حال چطور می شه با نوشتن عدد 25 و زدن کلید ENTER به رکورد شماره 25 در این سابفرم برم؟
با تشکر

[hamid-nice]

راه حلی هست ؟
با تشکر

[poriya1312]

سلام ببين منظورت اين بود

[hamid-nice]

سلام ببين منظورت اين بود
با سلام
تقریبا
چرا که می خوام یک دگمه روی فرم اصلی داشته باشم تا با زدنش دقیقا همین کار انجام بشه یا حتی همین خیلی خوبه تنها اگر وابسته به تب استاپ نباشه چرا که نمی شه همیشه تب استاپ این تکست باکس را با فیلد سابفرم پشت سر هم تنظیم کرد
آیا می شه این محدودیت را برداشت ؟ در اینصورت نمونه شما جوابگوست
باتشکر

[Abbas Amiri]

با سلام
تقریبا
چرا که می خوام یک دگمه روی فرم اصلی داشته باشم تا با زدنش دقیقا همین کار انجام بشه یا حتی همین خیلی خوبه تنها اگر وابسته به تب استاپ نباشه چرا که نمی شه همیشه تب استاپ این تکست باکس را با فیلد سابفرم پشت سر هم تنظیم کرد
آیا می شه این محدودیت را برداشت ؟ در اینصورت نمونه شما جوابگوست
باتشکر

از کدهای زیر استفاده کنید:

Private Sub Text0_AfterUpdate()
On Error GoTo ErrH
[sokhane_bozorgan subform1].SetFocus
DoCmd.GoToRecord , , acGoTo, Val(Text0)
Exit Sub
ErrH:
MsgBox "شماره درج شده وجودندارد"
End Sub


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