[silverlight]

الملف الاصلي و هو ALLWGS
قرائته تستغرق من 40 - 70  مللي ثانية

لكي يتضح لك الأمر قليلا
افتح مشروع عادي و ضع الملف الرئيسي في فهرس المشروع

و اكتب الكود التالي
انا قرات الملف و قرأت Header لوحده و الارقام لوحدها

PHP كود :

Public Class Form1

    Private timeToreadAllFile As String = ""

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Dim fpath As String = ".\ALLWGS.txt"
        ' توقيت لمعرفة المدة الزمنية لقراءة الملف كله
        Dim sw As New Stopwatch

        ' تشغيل التايمر
        sw.Start()

        ' قراءة الملف الرئيسي
        Dim s = IO.File.ReadAllLines(fpath)
        ' إيقاف التايمر
        sw.Stop()

        ' معرفة المدة الزمنية التي استغرقها قراءة الملف
        timeToreadAllFile += sw.ElapsedMilliseconds.ToString
        Dim i As Integer = Integer.Parse(timeToreadAllFile)
        Me.Text = i.ToString


        ' مصفوفة رأس الملف فقط
        Dim headeLines As String() = New String(6) {}
        For i = 0 To 6
            headeLines(i) = s(i)
        Next

        ' مصفوفة الارقام فقط
        Dim lines As List(Of String) = New List(Of String)
        For j As Integer = headeLines.Length To s.Length - 1
            lines.Add(s(j))
        Next


    End Sub
End Class 


إنسي BackfroundWorker حاليا

دعنا نتحرك خطوة بخطوة