تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مطلوب كود استيراد وتكرار
#1
السلام عليكم ورحمة الله وبركاته
انا اريد كود استيراد ملف text
ووضع اول سطر منه فى textbox1
وايضا كود يجعله يكرر هذه الخطوه مع السطر الثانى حتى النهايه
اى يكون تلقائى
اتمنى الرد وشكراا
الرد }}}}
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

إن كنت أخي تقصد وضع السطر الأول في TextBox1 والسطر الثاني في TextBox2 وهكذا..

استخدم الكود التالي .. مع مراعات أن يكون عدد الأسطر داخل الملف النصي = عدد مربعات النص في البرنامج


كود :
Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim TextFile As String
        TextFile = My.Computer.FileSystem.ReadAllText("c:\Sniper.txt")

        For i = 1 To TextFile.Split(vbNewLine).Count
            Controls("TextBox" & i).Text = TextFile.Split(vbNewLine)(i - 1)
        Next

    End Sub
End Class

وفقك الله
الرد }}}}
تم الشكر بواسطة: ashrof
#3
اخوي اذا حاب تستورد ملف تكست فاليك هذا الكود


PHP كود :
Dim r As String "C:\Users\bosqah\Desktop\text.txt"
        
If IO.File.Exists(rThen
            Dim opjreader 
As New System.IO.StreamReader(r)
            
TextBox1.Text = (opjreader.ReadToEnd)
            
opjreader.Close()
        
End If 

طبعنا في البدايه تحدد مسار الملف وصيغته

ولو تلاحظ textbox1.text هذا الي راح تستورد فيه التكست

اتمنى وضحت لك الامر بس بخصوص الاشياء الباقيه لم افهمه صراحة
الرد }}}}
تم الشكر بواسطة:
#4
(04-07-14, 01:33 AM)Sniper.ps كتب :
وعليكم السلام ورحمة الله وبركاته

إن كنت أخي تقصد وضع السطر الأول في TextBox1 والسطر الثاني في TextBox2 وهكذا..

استخدم الكود التالي .. مع مراعات أن يكون عدد الأسطر داخل الملف النصي = عدد مربعات النص في البرنامج


كود :
Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim TextFile As String
        TextFile = My.Computer.FileSystem.ReadAllText("c:\Sniper.txt")

        For i = 1 To TextFile.Split(vbNewLine).Count
            Controls("TextBox" & i).Text = TextFile.Split(vbNewLine)(i - 1)
        Next

    End Sub
End Class

وفقك الله

الف شكر بجد وتسلم HeartHeartبس انا عايز لما اضغط الزر button اول مره يظهر اول سطر واضغط تانى مره يتمسح الاول ويظهر تانى سطر(فى textbox)
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مطلوب كود جمع عدد غياب الموظفين بين تاريخين nmst70 5 139 16-02-17, 10:01 PM
آخر رد: Adrees
  [سؤال] مطلوب كود يقوم بالتنبيه naden 3 159 31-12-16, 02:47 AM
آخر رد: naden
Photo مطلوب كود لإدراج جدول بمواصفات معينة SYman 1 144 20-12-16, 06:54 PM
آخر رد: zinom
  [سؤال] مطلوب كود ربط combo box بقاعدة بيانات (اكسيس) BLACKBROWN5 5 296 13-12-16, 12:08 PM
آخر رد: tryold
  مطلوب تعديلات في هذه الاكواد بحيث تكون فعاله اكثر معتز الجازوي 2 189 28-11-16, 05:36 PM
آخر رد: معتز الجازوي
  [SQL] مطلوب جدول به اصناف محل كمبيوتر ... عاجل MH mekawy 2 171 03-11-16, 04:22 PM
آخر رد: MH mekawy
  [سؤال] SQL مطلوب استعلام naden 1 194 22-10-16, 10:07 PM
آخر رد: العواد الصغير
  [سؤال] مطلوب كود يقوم بعمل عداد count naden 5 284 13-10-16, 03:43 AM
آخر رد: الماجيك مسعد
  [سؤال] مطلوب كود لاظهار حرارة المعالج adeeb mark 3 224 04-10-16, 10:26 PM
آخر رد: adeeb mark
  مطلوب رابط لأداة عرض التاريخ الهجري Alshaf3y 0 160 29-09-16, 11:29 PM
آخر رد: Alshaf3y

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم