כתיבת תוכנה ב-VB

KOBINET

New member
כתיבת תוכנה ב-VB

יש לי רשימה ארוכה של משפטים שאני מעוניין להכניס למאגר כלשהו. אני מעוניין לכתוב תוכנה שתאפשר לי לכתוב מילה כלשהי וללחוץ על לחצן חיפוש ואז יוצגו לי רשימת המשפטים שיש בהם את המילה שהקשתי. בתודה מראש, קובי
 

שינאל

New member
מהו המאגר?

נניח קובץ טקסט שכל משפט מופיע בשורה חדשה, ז"א המשפט מסתיים ב 010, ו 013 במקרה זה פתח קובץ אמצעות Open קרא שורה(משפט) באמצעות Line input בדוק קיום המילה במשפט באמצעות InStr לדוגמה Open "MyFileName.txt" For Input As #1 Do While Not EOF(1) Line Input #1, TextLine if Instr(TextLine, MyWord)>0 Then ...... debug.print TextLine end if Loop Close #1
 
למעלה