[silverlight]

يمكنك استخدام الدالة التالية

PHP كود :

   Private Function ReadFile(fileName As String) As String
        If Not String.IsNullOrEmpty(fileName) AndAlso IO.File.Exists(fileName) Then
            Dim lines As String() = IO.File.ReadAllLines(fileName)
            Dim i As Integer = 0
            Dim s As String = String.Empty
            While i < lines.Length
                Dim line As String = lines(i)
                If Not String.IsNullOrEmpty(line) Then
                    s += line
                    s += ","
                End If
                i += 1
            End While
            Return s.TrimEnd(",")
        End If
        Return String.Empty
    End Function 


الإستخدام
حدد إسم الملف شاملا المسار و مرره للدالة
لو افترضنا ان الملف  موجود تحت فهرس المشروع و اسم الملف datafile.txt
يكون الكود كالتالي

PHP كود :

       Dim s As String = ReadFile(".\" + "datafile.txt")