منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كتابة السطر الأول - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كتابة السطر الأول (/showthread.php?tid=9023)

كتابة السطر الأول - عاشق الفيجوال - 25-05-13

بسم الله الرحمن الرحيم

أريد كود يكتب سطر معين كالسطر الأول مثلاً من ملف مفكرة txt إلى textbox

وأريد كود آخر ينقل ماهو مكتوب في textbox في السطر الثاني إلى textbox آخر

كتابة السطر الأول - trustmeee - 30-05-13

عاشق الفيجوال كتب :بسم الله الرحمن الرحيم

أريد كود يكتب سطر معين كالسطر الأول مثلاً من ملف مفكرة txt إلى textbox

PHP كود :
Dim dlgopen As New OpenFileDialog
 Dim InputFile As System.IO.StreamReader

 If dlgopen.ShowDialog = Windows.Forms.DialogResult.OK Then
    InputFile = New System.IO.StreamReader(dlgopen.FileName)
 
      TextBox1.Text = InputFile.ReadLine
     End If 


عاشق الفيجوال كتب :وأريد كود آخر ينقل ماهو مكتوب في textbox في السطر الثاني إلى textbox آخر


PHP كود :
Dim stringreader As New System.IO.StringReader(textbox1.text)
        Dim theline As Integer = 5
        For I As Integer = 1 To theline

            stringreader.ReadLine()
            If I = theline - 1 Then
                TextBox2.Text = stringreader.ReadLine
            End If
        Next 
الكود الأول جربته بنفسي ومتاكد منه
لكن الكود الثاني لم اجربه وكتبته بدون تجربة
جربه وشوف النتيجة ربما تصيب وربما تخطأ
المتغير theline ضع فيه رقم السطر الذي تريد كتابته من التكست بوكس الاول في التكست بوكس الثاني