التعامل مع الملفات النصية والسلاسل
FileOpen :
فتح ملف نصي إما للإدخال أو الإخراج
FileOpen(رقم الـملـف,المـســار ,الحالــة )
رقم الملف : هو الرقم الذي كتبناه عند إنشاء ملف
المسار: موقع الملف على الجهاز
الحالة إما تكون :
1. OpenMode.Input : للإدخال
2. OpenMode.Outputللإخراج :
LineInput :
تقرأ سطر إدخال من ملف نصي
LineInput(رقم الملف)
مثال : يمكن قرأة سطر ووضعة في متغير
X = LineInput(1)
EOF :
End Of File اختصار لـ
EOF((رقم الملف
وغالبا ما تأتي مع الـتكرار فمثلا أنة ينفذ أمر معين إلى أن يصل إلى نهاية الملف
Do Until EOF(1)
FileClose :
اغلااق الملف النصي
FileClose(رقم الملف)
ملاحظة :
يمكننا الاستغناء عن كتابة رقم الملف عند الفتح والإغلاق ونهاية الملف إذا كان الملف المفتوح واحد ولا يوجد غيرة ونجعل الأقواس فارغة
لفتح مربع حوار و عرضة :
OPenFileDialog1.Filter = “Text files (*.Anfal) | *.Text ”
OpenFileDialog1.ShowDialog( )
Open بدال Save وعند الحفظ نكتب
للتشيك عن اسم ملف مربع الحوار إذا كان فارغا
If OoenFileDialog1.FileName < > “” Then ……………………..End If
Open بدال Save وعندما نسأل عن الملف المحفوظ نكتب
Lable1 لتحديث
Label1.Text = OpenFileDialog1.FileName
Try ……1…….. Catch…2…….Finally…3……End Try
تكتب هذا وبينة الكثير من الأوامر والفائدة منها معالجة الأخطاء
1 تكتب الأوامر
2 تنفذ عند ايجاد خطأ
3 تنفيذ الأمر سواء وجد أخطاء أو لم يجد
لفتح الملفات النصية SttreamReader استعمال الفئة
يجب إضافة في أعلى البرنامج
Imports System.IO
وعند تعريف المتغيرات
X AS StreamReader
X = New StreamReader(“ المـسـار ”)
TextBox1.Text = X.ReadToEnd
StreamReader أمر يسمح بالدخول إلى الملف المطلوب
ReadToEnd أمر قراءة الملف من اولة إلى آخرة
إرسال تعليق