حلقه های فیلتر برای جستجو
فرید جان آقا جواد درست میگن لطفا تو انجمن آپلود کنید. یاد گرفتن پنل انجمن انقدرا هم سخت نیستا.
در مورد مثالتون خوبه بدونی که توی دیتابیس ها همیشه شروع کار با یه حلقه هست. یعنی وقتی اون دستور رو نوشتی که فلان فایل رو برو بخون و بذار توی لیست باکس، ام ام بی خودش تعداد خط های اون فایل رو شمارش می کنه و یه حلقه به همون تعداد در نظر میگیره. حالا برای فیلترینگ لیست تو باید هر خط رو خودت با یه شرط بررسی کنی.
توی یه مثال قطعی میشه یه چیزی شبیه این :
کد:
For i=1 To NOL
If (Search$='F') Then
**Add To List
End
Next i
و توی یه مثال یه خورده پیشرفته تر میشه این :
کد:
For i=1 To NOL
Item$=StrFromFile(File$,i,1)
POS=POS(Search$,Item$)
If (POS=1) Then
**Add To List
End
Next i
که به جای POS از GetArrayItem هم می تونی استفاده کنی یا می تونی خودت یه حلقه ی دیگه برای دونه دونه کاراکتر های بنویسی که اینطوری دقیق تره اما سرعت ام ام بی جوابگوی اینکارا نیست.
در ضمن توی مثالی که POS نوشتم به نظرم بهتره که نگی اگر فقط اولش بود و با نوشتن این شرط :
If (POS>0) Then
همه جای یه خط رو بررسی کنی.
اگر بخواهی بازم بهتر کار کنی باید کار با آرایه ها (Array) رو یاد بگیری. که خیلی ساده تره اگه فقط یه بار درکش کنی.
(مثال نذاشتم که خودت بسازی و برای ما هم آپ کنی؛ با ایده های جدید.)
موفق باشی.
