السلام عليكم

السلام عليكم’

لنفترض أننا كتبنا في ملفنا سطورا واستعملنا Line Print فعندما نريد قراءة السطور نستعمل العكس ونقرء ب Line Input #NumberOfFile, VarTxt طبعا بعد أن نكون فتحنا الملف .

إدا أردنا مثلا أن نقرء 3 سطور نكتب

for i=1 to 3

line input #NumberOfFile,aa(i)

next

وتكون عندنا السطور في aa(1) aa(2) .

إلى اللقاء.

السلام عليكم ورحمة الله وبركاته

يمكن ذلك عن طريق فتح الملف بالطريقة العاشوائية راندوم random كيف ذلك ؟لنأخذ مثال :

اريد أن أقرأ السطر الثالث من ملف عشوائي ؟

كويس ولكن كيف يمكن للبرنامج معرفة ما إذا كان هذا السطر هو السطر الثالث أم لا؟

هذا بسيط جداً ،،، كيف؟

عند كتابتك للبيانات بداخله رقم الأسطر مثال كودي :

open "C:\test.txt" for random as #1 len (225)

put #1,1,"welcome"

put #1,2,"how are you?"

put #1,3,"osama"

cloise #1

الآن قد قمنا بكتابة بيانات إلى ملف عشوائي وحددنا سطر كل معلومة فالمعلومة "welcome" في السطر الأول والمعلومة "how are you" في السطر الثاني

الآن أريد أن أقراء من السطر الثالث لكي نقوم بذلك يجب أن نفتح الملف من جديد ولكن بصيغة القراءة وهي get حيث put صيغة كتابة في الملفات العشوائية

open "C:\test.txt" for random as #1 len (225)

get #1,3,readinf

close #1

text1.text=readinf

هذا الكود يمكن برمجته بطريقة احترافية حيث يمكنك كتابة رقم السطر تلقائياً من خلال عمل لوب وادخال البيانات بداخلها عن طريق متغير .

تلاحظ وجود len (255) هذا الصيغة مهمة جداً في الكتابة للملفات العشوائية أو القراءة منها لأنها تقوم بتحديد مساحة السطر التي تقوم بقرائته وتقوم بحساب موقع المعلةمة حال القراءة .

إن كان هناك استفسار الرجاء السؤال وسوف أقوم بشرحه لك

الخلاصه :

انت عايز تاخذ بعض السطور و الاخرى لا مظبوط اتعامل مع دوال النصوص

انشاء صندوق نص غنى وخلى النص الموجود فى الملف يظهر فيه بشكل مخفى واستخدم الدوال فى التحديد

left right ltrim rtrim trim mid instr

فى تحديد الجمله اللى انت عايزها

شكرا لكم