24-02-13, 04:13 AM
sooriaty03 كتب :وعليكم السلام ورحمة الله وبركاته
أخي الكريم استعمل هذه الدالتين فقط عندما تريد قراءة سطر واحد فقط
كود :
Private Function LoadLine(ByVal Path As String, ByVal Index As Integer) As String
Return System.IO.File.ReadAllLines(Path)(Index)
End Function
Private Function LoadLine(ByVal Path As String, ByVal Index As Integer, ByVal Encoding As System.Text.Encoding) As String
Return System.IO.File.ReadAllLines(Path, Encoding)(Index)
End Function
وطريقة استدعائها إذا كنت تريد استدعاء الاسم رجب مثلا
ضع الكود التالي
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'الرقم 4 هو رقم السطر المطلوب
TextBox1.Text = LoadLine("c:\1.txt", 4)
'أو بتحديد الترميز المطلوب
TextBox1.Text = LoadLine("c:\1.txt", 4, System.Text.Encoding.Default)
End Sub
بالتوفيق
جزاك الله خير ورحمك وغفر لك
هذا هو المطلوب بالفعل
وشكرا انك وضحت الطريقتين التى بالترميز والعاديه
Easy 4ever كتب :~ المثال بالمرفق ~
ملف ولا اروع
جزاك الله خير
تعلمت منه اشياء ايضا لم اكن اعرفها
لى استشاره معلش
انا ساستخدم هذه الطريقه لاجعل برنامجى متعدد الغات
بمعنى اصنع اكثر من ملف للغات فى كل ملف اللغه الخاصه به
مثا اللغة العربيه
إقتباس :ملف
مجلد
خطاء
تم العثور عليه
غير متوفر
جديد
[SIZE=4]مثال ال[SIZE=4]لغه الانجليزيه
[/SIZE]
إقتباس :File
Volume
Impropriety
Found
Not available
New[SIZE=4]
[/SIZE]
وساقوم باستد[SIZE=4]عاء السطر المراد فى مكانه المحدد على ا[SIZE=4]ساس اللغة التى تم تحديدها
كنت ساقوم بحفظ جميع ال[SIZE=4]اسطر كل سطر فى متغير عا[SIZE=4]م واقوم باستع[SIZE=4]ائه عن ال[SIZE=4]لزوم
لاكن حسيت ان كثرة المتغيرات تستهلك مساحه مما يجعل البرنامج ابطئ
[/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE]
هل هذه الطريقه كويسه ولا هناك طرق افضل متبعه
ارجو نصحى وجزاكم الله خيرا

