پیدا کردن شماره چند رکورد به طور همزمان

[niksalehi]

سلام دوستان
من میخوام توی 10 تا تکست باکس 10 تا شماره بنویسم، بعد روی کامند کلیک کنم، بیاد اون 10 تا شماره رو توی یه تیبل خاص سرچ کنه، و شماره رکورد هارو به من بده
ممنون میشم راهنمایی کنین:قلب:

[رامین مرادی]

خوب این راحته شما می تونید برای هر شماره یه سلکت بنویسی و وقتی پیداش کردی اونو تو یه جا ذخیره کنی بری بعدی رو بنویسی اوکی کدش هم اینه

rst.open "select * from tbl1 "
dim a (1 to rst.recordcount) as string
i=1
while not (rst.eof)
dim a(i)=str(rst.filde("id"))
i=i+1
loop
for i=1 to rst.recordcont
if text1.text=a(i) then print "شماره رکورد در جدول "& i
next

دوست عزیز می تونی حلقه آخر رو به تعداد مورد نظر تو کدت استفاده کنی
در کل این مدلی که من نوشتم خیلی ضایع بود آخه داشتم تو یه جای دیگه کار می کردم که ذهنم مشغول بود نتومستم الگوریتم بهینه تری به شما معرفی کنم .